what's it?
I want to open the same form with different buttons (cos different criteria are attached to those buttons).
When i click i want the background to change based on the button.
So im asking for just one line of code: What's the vba to change background property of a form dynamically. cna't seem to find it :o
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 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 have a userform that pops up when I am implementing a VBA subroutine. The nature of the form is simply to update the user what progress through the operation the code is using a label called lblProgressText.
So, I have a form called frmProgress and in my loop I use:
The lblProgressText control just wont update (but earlier today it was so maybe I have broken something).Btw, all this code is run from a Module, not in the form object.
I have a form with two textboxes that get their values from two different queries that counts records from table. If textbox1.value equals texbox2.value the textbox2.value back ground colour is green. If they are not equal textbox2.value goes red. Itried with using conditional formatting, but it doesn't work all the time as the form is not updating when it is opened.
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 some code here that is changing the color of a txt box in my form based on the value in the text box. Everything is working great. The only problem is that I have a sub form with many tabs and many, many txt boxes. I would have to replicate this code hundreds of times....
Does anyone know a better (LESS CODE) way to look in the form and change the color of a txtbox based on a value. Something more generic. RIght now I am targeting specific txt boxes...
I just want a general statement that targets the entire form
THANK YOU ALL FOR YOUR HELP.....THIS IS A GREAT FORUM AND LEARNING TOOL....
CODE:
Private Sub Lower_Level_Concession_Inside_COUNTERS_AfterUpdate () If Lower_Level_Concession_Inside_COUNTERS = "2" Then Me.Lower_Level_Concession_Inside_COUNTERS.ForeColo r = 255 'The New color. Me.Lower_Level_Concession_Inside_COUNTERS.FontBold = True Me.Lower_Level_Concession_Inside_COUNTERS.BackColo r = 65535
ElseIf Lower_Level_Concession_Inside_COUNTERS = "1" Then Me.Lower_Level_Concession_Inside_COUNTERS.ForeColo r = 0 'The New color. Me.Lower_Level_Concession_Inside_COUNTERS.FontBold = True Me.Lower_Level_Concession_Inside_COUNTERS.BackColo r = 255
Else Me.Lower_Level_Concession_Inside_COUNTERS.ForeColo r = 0 'The New color. Me.Lower_Level_Concession_Inside_COUNTERS.FontBold = False Me.Lower_Level_Concession_Inside_COUNTERS.BackColo r = 12632256 End If End Sub
I use forms to display client info and i would like to know if the following is possible, and if so, how ?
When a clients installation date is older than 6months old (date is in a text box) i would like the form's background to change colour for that paticular client.
eg/ if the clients installation date was 7 months ago, the form's background would change red - but only to that client.
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?
Im trying to change the background colour of some fields if the value is null or missing, but I'm not quite sure how to handle the coding. The fields in question are title, given name and surname, and if they are empty I want to change the background colour to highlight to users that they need to collect this information. Any help that you can provide would be great!
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
I'm working with a form someone else created and am adding a delete button. I've managed to add the button and get some code working which will delete a record from a table. The problem I'm having is that after the delete operation occurs all fields in the form, and the corresponding items below the form, show #Deleted in all fields. How can I force a refresh using code?
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 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.
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 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