Change Field Background Color Based On Query Results
Jun 24, 2014
I would like to change the background color of a field that is the result of a Unique Values query. I am trying to get a list of invoices where all the line items are approved. I can't seem to get it to work the way I want because if even one invoice line item is approved it will show up as approved.
Is there a way to change the background color of the invoice field to red if ANY of the Approved line items are = False
I have a database with 200 clients. If a user pulls up a record and the customer's insurance has expired, is it possible to change the background color of the form so that this automatically alerts the user that this customer needs to be contacted and the record needs to be updated?
Or are there any other suggestions that may serve the same purpose?
I would like to change the Font and background color based on dates.
-I have a text box (Training Event) on a form populated from a field (Training Dates) in a query.
- I need the font and/or the background in that text box to change to red when the date is 12 month past, yellow 11 months past, white 10 months past and green for 9 months past.
in a continuous form i want to click on one record and have the one field change the background colour to highlight it. When I use the code: Field. BackColor = vbYellow it changes the background on all the records. Is there a code to say only for the record with focus?
I have a Data Access Page that I need some help with some of the code.
I need to do a comparison to see if the TimeStamp Control is less than one hour old. If it is, it should have the background turn red. If not it should stay white.
Form = BLine_Messaging Control = TimeStamp
Code:<SCRIPT language=vbscript event=onload or=window><!--If (BLine_Messaging.TimeStamp.value > DateAdd("H", -1, Date)) THEN BLine_Messaging.style.backgroundColor="white"else BLine_Messaging.style.backgroundColor="red"end if --></SCRIPT>
I have installed Windows 10 & Office 13.The Background color of MS Access 13 is white in color which is irritating. Is there a way to change the background color?
I searched around but i couldnt really find or atleast understand how to do what i want to do. I want upon the user clicking on a checkbox for the background of the form to change to a set color?
I'm using the changebackgroundcolor.zip sample that I found here at Lebans site. URL....I'm trying to find a way to keep the color that I picked after the database closes. I tried to follow the example here URL....but couldn't get it to work.how to get the color to stay on the color that was picked from the dialog box?
I have some code to check a combo box if a date field is filled in, then the combo box can't be empty.I can make the error message appear, but the combo box does not want to change color and it does not recognize any other than value..This is the code that I have, and it does not work like I wish it could.(I took the database over from some one else and need to make improvements on it. the field names where not created by me).
Code: Private Sub cmbCurrentStatus_AfterUpdate() '<<<<<<<<<<<<<<<< Working on >>>>>>>>>>>>> If IsNull(Me.[STEP 1 4 check current status]) And Not IsNull(Me.[Checked__date_]) Then MsgBox "Checked (date) can't be empty if Current Status is filled in!", , "Incomplete Form!" Me.[STEP 1 4 check current status].Value = RGB(255, 0, 0) Else Me.[STEP 1 4 check current status].BackColor = RGB(255, 255, 255) End If End Sub
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.
how to change background color of MSAccess Reports using VBA? How can I do border coloring. What are the vba codes for all color options like light green, light blue etc. How to change the font type to bold etc using vbaI did some changes to text box coloring in Detail Section on format click event.
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?
I am using a continuous form and would like my users to be able to change a field background color to a light red by double-clicking. The user would also be able to change it back to white by double-clicking again.
The code I am using (below) changes the field background color for all records. I need my code to only change the field color of the current record and cannot seem to find how to do that. The field name is [System_CurrentStatus].
Private Sub System_CurrentStatus_DblClick(Cancel As Integer) If Me.System_CurrentStatus.Backcolor = vbWhite Then Me.System_CurrentStatus.Backcolor = RGB(234, 154, 160) ElseIf Me.System_CurrentStatus.Backcolor = RGB(234, 154, 160) Then Me.System_CurrentStatus.Backcolor = vbwhite End If End Sub
I am rebuilding a file that deals with a lot of active and inactive accounts. I would like to change the inactive record to a yellow or red when a check box is marked. It has been about 15 years since I have written any macros or VB functions.
In access report, I'm trying to change color of text in specific records based on the true/false value in another record. Works in forms using conditional formatting, but won't seem to work in a report.
Here's what works in forms : IIf([2009 Symposium]=true, forecolor=255 ....this changes the records to red.
But using the same expression in a report doesn't change the text color.
What I'm trying to do is make it so that a certain area of my Detail area in my report changes colors based on whether or not a field name for each record is set to "Yes". The effect I wanted was produced easily enough by creating a Rectangle, coloring it Red, and setting it to not visible.
Putting RedBox.Visible = True in the Report On Load procedure works just fine. The problem I am having is attaching a condition to it.
Code:
If Me.FormatBox.Value = "Yes" Then RedBox.Visible = True End If
This compiles ok, but doesnt do anything to the actual report. Will it not work because the report has x amount of FormatBox's because it gets replicated for each record that is displayed? I should also note that I tried using a DL Lookup within my If statement and that didnt work either. That just colors all the boxes red and ignores the check.
Code: Dim TestVar As String TestVar = DLookup("Priority", "Table_Lancaster_Dispatch", "Priority = 'Yes'") If TestVar = "Yes" Then RedBox.Visible = True End If
How do I conditionally change the Back Color and Alternate Back Color based on the value of notes.FollowUpDate? I have a continuous form using the following code:
Code: Private Sub b_all_past_Click() Me.resultsFrame.SourceObject = "FollowUp_bystaff" Me.resultsFrame.Form.RecordSource = "SELECT * From notes WHERE (((Notes.FollowUpDate) < Date()+1) And ((Notes.followup_person_id) = GetCurrentUserId()))ORDER BY notes.priority,(notes.FollowUpDate) DESC;" ' End Sub
I have a similar problem, I'm fairly new to ACCESS and am learning it is vastly different than EXCEL that we use (we are upgrading to ACCESS to track our "in" and "out". I have set up a ACCESS database to track our barge loading and pumping, on the delay we enter reason for the delay but if no delay occurs it is left blank. How can I get the field to change colors if information is entered and left alone if none is entered. Quote: Originally Posted by shamrog12 Make sure to dim recItem1Value and backg in the appropriate area
Try this: Code:<%recItem1Value = lcase(Recordset1.Fields.Item("RecItem1").Value)backg = ""Select Case recItem1Value Case "x" backg = " style=""background-color:red;"" " Case Else backg = ""End Select%><!-- whatever code here... //--><td<%=backg%> nowrap><input name="txtField1" type="text" onChange="RecUpdate value="<%=(Recordset1.Fields.Item("RecItem1").Value)%>" size="4"></td>
Is there a way to change the back color of an active field in a form? Meaning, when I tab through my form and the field I tab to becomes active, the field turns white. This poses a problem because my form back color is black and my field text is white. When the field is active, I can't see the value in the field due to the back color defaulting to white. Does this make sense? Is there a way to change it?
i have an application and the user was asking me to give him the ability to change the backcolor of the main form i had done that with one color option.
but now he wants to mix two colors together any one can help me with that , if code or sample would be posted, that would be appreciated .
How do I change the background color of a tab or can you? The form that I am looking at has a tab button, but it looks like a normal form for the background. It has the grid and has a color for the background. I have designed a new form and added a tab control. But the background is grey and I would like to change it. Please help, if you can. Thanks.
I want to change the background color to a plain white color. So I used the coloring bucket to fill it in. The problem is that it does not have any effect. In the picture you can see that the greyish color with the white dots remain.
This is some kind of standard template. Is there anyway I can remove it so I can fill in plain colors?