I'm new to VBA - Access but just dangerous enough to get in trouble. Is there a way to make a variable with the code below? I've been scouring the net all day and can't find answer. What I would like to do is make all the "cirsize1" be a string. Particularly the "Me.cirsize1.ForeColor". if I use the "cs" string it works fine with the Me.cirsize1 = 0 (ie "If cs = 0") This is just a snippet of the code.
Private Sub cirqty1_AfterUpdate()
Dim cs As String
cs = Me.cirsize1
If Me.cirqty1 > 0 Then 'if there is a quantity greater than 0 in circle qty and
If Me.cirsize1 = 0 Then 'if there is 0 in circle size
Me.cirsize1.ForeColor = vbRed 'then make the circle size 0 red
Me.txtCirIPM1 = 0
End If
End If
End Sub
I have a text box and currently this is my control source
="Testing " & [test]/3 test = 1000 so my text box reports: Testing 333.333333333333
Is there a way to make it into a form like $333.33...Also is there a way to make [test]/3 come out in a money text form? like "Three hundred thirty three dollars and thirty three cents.
Where can I find the Hex or RGB value for the blue colour that Access 2010 uses by default for buttons on forms? I need to change some buttons to yellow (I know the code for that) but later change them back to the previous shade of blue, which is shown in the Properties pane "Accent 1, Lighter 40%".
By clicking in the standard colors area at the bottom of the colour chooser I can find a very similar blue #D6DFEC but it doesn't look quite right. And the "accent" colour does not give me a Hex value.Is that "usual" blue even one colour? How can I reset a button to that style having changed it?
I created a form that has about 200 fields and all the fields are utilized at a point depending on the work order assigned to us. I wanted to know if it's possible to put like a toggle box or a check box etc. next to the field so if it is checked it would be in a Dark color and the ones not utilized are in a shade of gray. All the fields are coming from the same table. Another thing it's an estimate worksheet so a row would have something like, Labor, QTY, HRs, Overtime, total as columns, so I would want a check box to have control over those but one for each row, EX contractor, locksmith.
Is there a way to permanently set the alternate row color in access, so that whenever you create a form it will always be what I want.I know that I can make a template and always use the template, but I would prefer to just change the access settings if that is an option.I checked the access settings but couldn't see an option to do this.Also if you can set sub-form's to always have a transparent border, so that you don't have to change it every time you add a sub-form to a form.
Not sure if this is can be done: I have a picture and I want to change its color in accordance with values in another textBox. Is that possible? if Yes, then what would be the procedure and the codes?
I can use Conditional Formatting on the text to color code the record data in a report.But, I want the text to be the same color.What I'm trying to do is add a Box control from the Design Tools and color code the box depending on the value of a field in the table. The box will appear next to the record.
The field is called ReminderTypeID and there can be only two values for this field - 1 or 2.If the value is 1 I want the box's BackColor to be red. Otherwise what ever color I assign it to in design view.I've tried the following in the On Current.
Code:
If Me!ReminderTypeID = 1 Then Me.bxCode.BackColor = RGB(186, 20, 25) End If
I get no error messages but in all records bxCode has the same color which isn't the one I'm trying to set.
I have a subform that is purely to display information (no edits will be made on it). The subform has a special color on it (company color) that I can not deviate from. My problem is the first record in the subform (displayed as a continuous form) gets the focus. The font is white and standard access has a white background. My end goal would be to elimnate the focus for any record in the subform (if it is possible). I know that I could change the color with conditional formatting but the colors in conditional formatting do not match the company color.
I would like to have a conditional formating colour of green if the field contains a value like 10%..If the field has no value and is blank there will not be any background color change
I have several forms that each has a dozen or more checkboxes, true/false. I want to be able to change the background color of the label of each checkbox depending on if the checkbox is true or false. I have used the following code which works great:
If Me.A = True Then Me.lblA.BackColor = vbYellow Me.lblA.BackStyle = 1 Me.lblA.ForeColor = vbRed Else Me.lblA.BackColor = vbWhite Me.lblA.ForeColor = vbBlack End If
Me.A refers to T/F checkbox A and Me.lblA refers to its label. This is repeated for each of the checkbox controls. If the control is [B], then its label is lblB. I have used this in the form OnCurrent event and the checkbox control OnUpdate event. I was wondering if I could use the tag property to this, saving me writing countless lines of code and having the OnCurrent event of each of the forms so long and cumbersome. And I do know that I can use conditional formatting to do this, but I would prefer not to use that method. Is there any way to do this using the tag property and not so many lines of code?
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 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
I am attempting to create an expression that will change the font to red if it is an overdue date. It will be on a form with the records showing.
My datebase is for entering, changing, and searching for information dealing with orientation dates, contacts, and associations. My data sheet holds the company name, employee name, date of orientation, due date (orientations are completed annually), contact employee, and status. I would like the date, when opening the form, to show red if it is past due. how to create an expresion to return the status as "Current" or "Overdue", as I am still unsure which method I want to use.
I have a table named ColorValues with the following three fields:
- ID - MunsellCode - RGBValue
30 fields from another table called Color_Analysis are linked to the above with one to many relationships (I've already thought of other ways to normalize data, but this is the most efficient, so no need to go into this topic).
Now, I've constructed a form for Color_Analysis and all 30 fields recording color are included as combo boxes bounded on the ID in ColorValues and displaying the MunsellCode for the user. I've also created unbounded text fields next to the combo boxes and want to use them to display the color that the user selected in the ComboBox. The question is how do I do this?
Essentially I need a piece of code that picks up the value of the combo box (this is essentially the ID in ColorValues), looks up that value in the ID column of the ColorValues table and uses the corresponding RGBValue of the same table as the .BackColor for the unbounded text field.
I have images in my form, say, Image1 and Image2 . The default background color for all of them are white. If the user click image1, the background color has to be red. If the user click image2, the background has to change to red and the image1 retains its default color ( White ).
I have six images to loop through these. Image1 to image6.
no 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.
In my table (tbl_data) I have a field named Rating. This can be anything from 1 - 10.
On my form (frm_input) I have a textbox (created using the wizard so at the moment I'll call it txt_Rating).
What I would like to know how to do is:
If the value in the textbox is 0-5 leave the background colour of the textbox white with black font. If the value in the textbox is 6-7 turn the background colour pale yellow with black font. If the value in the textbox is greater than 7.1 turn the background colour Red with white font.
I have a listbox and whenever I clicked on a row it will highlight black background and white font color. How can I disable this or change the formatting?