I have a box with age in called [agecalc]. I want to change the border of the box to red to indicate they are a Juvenile if under the age of 17.I already have some code to write the text, I just need to change the border of this text box called agebox
=IIf([agecalc]<=17,"Juvenile!!")
I have this code that should change backgroundcolor in multiple items form based on a value of a field:
Private Sub Form_Current()
'check if field on form called somefield is DVD
If Me.TYPE.Value = "DVD" Then
Detail.BackColor = vbRed 'DVD
Else
Detail.BackColor = 16777215 'BOOK
End If
End Sub
But it does not work, what can I do?
Hi all,
I am trying to have the rowsource change on a "subcategory" combo box depending on what the "category" combo box says.
I added an event procedure to the "Category" combo box which changes the Row Source in the subcategory combo box to something else. I'm not sure that I did this right as if I close the database and reopen it, what I selected in the subcategory combobox is gone and it is blank. Any ideas? Here is my simple, likely incorrect event procedure:
Private Sub Category_Change()
If Category.Text = "Rare Books" Then
SubCat.RowSource = "scRareBooks"
End If
If Category.Text = "Legal Documents" Then
SubCat.RowSource = "scLegalDocuments"
End If
End Sub
Thanks!
I have a report that prints labels (similar to avery labels) which pulls data from a query. These labels are all unique and vary in length. Due to the length variance, I want the font size to get smaller for labels with more characters. I want the text to go down to another line when necessary.
In my report under the OnPage Event Procedure I wrote this:
Private Sub Report_Page()
If Len(Text2) > 20 Then Text2.FontSize = 8
If Len(Text2) > 10 And Len(Text2) < 21 Then Text2.FontSize = 10
If Len(Text2) < 11 Then Text2.FontSize = 14
End Sub
This works to some degree but the problem is that once there is a longer label, all of the proceeding labels are resized & the longer label that should have been resized was not.
Is there another place I should be writing this code? I looked under events for the textbox but there doesn't seem to be anything that would work since none of them would trigger when printing labels
I am trying to add a percentage sign (%) after a number I get from a table, thus the number 1,5 should display 1,5% and NOT 150%.
I am using the Format Property of the text field.
I tried #,##% which converted the value to a percentage (1,5 became 150%) Then I tried #,##"%" and #,##\% Access ignored both and changed the value in the property field to #,##% Using the Format function is not an option because it is a bound field which should be editable.
I realize there are several threads already dedicated to this particular topic but my situation is slightly different... First, my tables are set up like so:
tblStudent(studentID,LName,FName,MI,Gender)
tblRack(rackID,roomID,studentID,rackNumber)
tblRooms(roomID,roomNumber)
There are 3 racks to a room and a total of 90 rooms. A room can hold up to 3 students. A list box holds values that I have typed in (the room numbers). I went with typing them in rather than pulling them from a query because of the way my tables are set up. If I pull from a query as the tables stand, room numbers show up 3 times, once for each rack. I want to be able to fill in text boxes with information on students assigned to the room I choose from my list box (FName, LName, etc...) I'm kind of at a loss here on how to go about getting the info that I want. Using the column property to populate text fields is probably going to be much easier but a query is needed (I think) and using a query causes room numbers to show up 3 times in my list box... Anyone want to throw me a bone?? Thanks! :)
In Access 2007 (or 2010 , 2013), in a continuous form, I want to change the background colour of a text box depending on its value. Obviously, for each record, the color can be different.
View 1 Replies View RelatedI am creating a training database and first I have tables in relationship to the courses:
tbl_Courses
Course ID (Primary Key)
Course Title
Objectives
Instructors (lookup field allowing multiple instructors to be selected, meaning they are skilled to teach the course)
tbl_Instructors
Instructor ID (Primary Key
Last Name
First Name
Full Name (Caluclated to put Last Name, First Name)
[code]....
What I am trying to do on a form to create a new event is once the user selects the Course from the Course ID combo box, then I need the Instructor combo box to only display the instructors who are skilled to teach the course which are selected in the tbl_Courses.
I can get all Instructor ID's, but not the names and the class that has multiple instructors show on one line.Should I have not put the Instructors field in the tbl_Courses? Do I need another table for instructor skills or something?
I currently import data into a table and it it has a text field which looks like this: 12,345.67 GBP...I need to use a query to make this a number field so that I can sum it's contents. I've managed to remove the 'GBP' part but can't seem to get rid of the comma?
View 4 Replies View RelatedI have a report, and the "reason" field is one that can grow as needed. The following string is in the field: "MISSING IMPLEMENTATION PLAN, MISSING SERVICE LOGS FOR DATE OF SERVICE". I bolded MISSING, where the space hits the border. My standard setting for the border style is Transparent, and the space is causing the growing to not work properly. TransparentBorder.pdf shows the incorrect growing. When I change the border style to Solid, the growing works correctly, as shown in the SolidBorder.pdf file.why the growing is not working properly with the Transparent border, but does work correctly with the Solid border?
View 3 Replies View RelatedIn the database, there is a table called "Jobs" which sales enquiries are entered into. In this table, there are fields called "JobStatus" which has the default text of "Quotation Pending" and a combo box "JobLive" which is a "yes/no" field. Normally a job will come in as quotation request and the "JobsLive" field will be set to "no".
Occasionally, a job will come in as confirmed from the outset. In this case, the job will be marked as "live" in the combo box "JobLive". Is it possible to change the "JobStatus" field to "Job Live" when this combo box is changed to "yes"?At any other stage, the "JobStatus" field will be changed using an update query as and when changes are made.
Using Access 2010. I have a form on which I've placed a simple label. I try to set the label border color to black but it shows grey. I can set the border color to #000000 and it's grey. I set it to #000001 and it shows black as expected.
I'm thinking it has something to do with the themes, but shouldn't an exact color code show as expected? As a new member (<10 posts) I can't post an actual link, but here's the text of the location: [URL] ....
I have a Table table_clients and a connected table (1-->many) table_invoices.
I have two forms:
form1(table_clients): all clients with subform1(table_invoices): all invoices for every client
the form2 and subform2 are the same, just objects are placed differently on page.
I want when I have opened a record on form1/subform1, to be able to click a button and open form2/subform2 filtered by the invoice_id and the client_id.
I have a form which has a combobox where the user selects a record from another table,I want to hide the forms fields [managercontact] and [managertelno] depending on the value of the combobox (manager) from the table details, but its not the value shown in the combobox its the value of another field [type] from the same table called details. Its one of two values being 'conc' or 'ob'.
View 2 Replies View Relatedno problem about setting a different border color for a single textbox (or combobox or listbox) which has focus. How about to change, with a small and fast VBA code avoiding to write code for each textbox, the border color (ora other textbox properties) for a many controls in a form?
I tried using 'For each ctrl in Form....', but I got only bad results. All my control are within differente pages in TAB control.
I'm trying to change Selected text color in an Access data Field. I want the change to be permanent and show up in reports.
View 1 Replies View RelatedI have three labels that I can't change the text color. I must have them locked or something. What should I check?
View 5 Replies View RelatedI have 4 fields that are unbound on a form. img1 img2 img3 img4..When these are entered they are all combined and autofill another unbound textbox = imagename.. what i would like to do is from this unbound textbox 'imagename' ..i would like to populate a textbox that IS bound called FileName
[Event Procedure]
Private Sub imagename_Click()
Me.imagename = Me.FileName
End Sub
I have created a member data base form in Access2010.
That has been populated with 366 member records
I have two text box fields that are currently free type fields, Member Type & Member Status.
What is the best way I can change these to show only the relevant options:
i.e. Member Type ( Full, Family, Pensioner, Life. )
Member status ( Current, Lapsed, Deceased)
I have tried to right click the field but the "change to" option is greyed out & not available.
I have also tried to insert a combo box or list box to show these options. The "use control wizard" option has been highlighted but when I drag either a combo box or list box into the form. the wizard does not activate.
I am creating a database where I will select recipes from one table and then create a shopping list through related ingredients from another table. I want to be able to clear all selected recipes before I start a new class.
For example, I have 100 recipes and am using 10 this week, but next week i am using a different 10. To create a new grocery list I want to clear all of this week's selected recipes before selecting the new bunch of recipes.
Is there a way (I am assuming a macro would be used) to insert a command button that would change all y/n values of the recipes table to no?
I have an Access database (.accdb) that has table, form and report. The field in all are the same. The user interacts with the Form only and enters data to it. Table is a back-end thing and no-one goes to it. However, in Form there is a button that when pressed, prints the report for that relevant form/record which we then give to customers.
Now, I have a field in report (like a signature field) that mentions the name of the user who printed that report. Lets say, Mr X did the data entry and then printed the report and gave it to the customer. After that customer loses the report and comes back for a copy of the report, but now Mr Y is at the desk and issues the report. Obviously Mr Y doesn't have to do the data entry again because record is there and Mr Y has the access to it, so he just presses the print report button and prints the report. What I would like is that the signature field should update itself if anyone else (in this case Mr Y) accesses the database and prints the report for that specific record.
I have several result fields which are all drop down lists. I want each result field's drop down list values to be different depending on the selected value of the Test1 drop down list.I came up with using the .rowsource keyword. My syntax seems to be fine but I'm not getting any values under the result fields when I run the form.Here is my code so far:
Private Sub Test1_AfterUpdate()
If Me.Test1 = "Stress Echo" Or Me.Test1 = "Stress SPECT" Or Me.Test1 = "Stress PET" Or Me.Test1 = "Stress MRI" Then
Me.Test1Result2.RowSourceType = "Value List"
Me.Test1Result3.RowSourceType = "Value List"
[code]...
In my current database there seems to be two different types of borders in my pop-up forms! The best way to explain it is that some forms will have the Access style border while others have the glass style border that you see in windows. I can't seem to find any settings that will change this or even determine what causes it.
View 4 Replies View RelatedI have a simple add form that will add an entry to one of two tables: Box 1-1, or Box 1-2.
They have the exact same fields. In the add form, I want the user to specify a Rack field and a Box field. Box 1-1 would be Rack 1, Box 1. Box 1-2 would be Rack 1, Box 2 (there will be more tables later, but just using two for now until I get it working).
But right now my form always adds to the table Box 1-1 - I can't get it to switch.
I've added the code I have so far below. The first part is what I'm having trouble with, the second part just uses a Submit button to add a new record - I'm just including it in case it's interfering in some way I'm not seeing. I'm running Access 2007.
Code:
Private Sub Switch_BeforeUpdate()
If Me.Rack.Value = "1" And Me.Box.Value = "1" Then
Form_Add.RecordSource = "Box 1-1"
ElseIf Me.Rack.Value = "1" And Me.Box.Value = "2" Then
Form_Add.RecordSource = "Box 1-2"
[Code] ...
I have a continuous form that displays data from a table. What I am trying to accomplish is to change the format of the field if the string length is equal to 11, to "@@@-@@@-@@@@-@". Otherwise if it is greater or less than 11 then no format.
I have tried it using code:
If Len(Me.FormFieldName)=11 Then
Me.FormFieldName.Format = "@@@-@@@-@@@@-@"
End If
Is it even possible and if so is my syntax correct or am I way off base?
Hi,
I am building a stock control database. I have a form called [products]. On this form are two fields. One called [ProdReorder], the other [UnitsOnHand].
[UnitsOnHand] is displayed form a subform called [ProductsSubform].
What I want to know is: What code would I enter (& where) so if the [UnitsOnHand] value is less than the [ProdReorder] value it will display the value in red?
Eg: Reorder value is 5
I have 10 motors on stock (UnitsOnHand) = Text is black.
If I have 4 motors on stock = Text is Red.
How can this be done? any advice welcome. PS. my vba skills are weak.