Changing Color In IIf Statement?
Feb 1, 2007
I have this expression:
=IIf([Text131] Between 16 And 30,"Unacceptable",IIf([Text131] Between 31 And 42,"Marginal",IIf([Text131] Between 43 And 56,"Effective",IIf([Text131] Between 57 And 71,"Very Good",IIf([Text131] Between 72 And 80,"Outstanding","")))))
It works just fine, but I was wondering if there'd be a way to change the text color of the <<true>> statement based on what it is? i.e. "Outstanding" and "Very Good" would be green, "Effective" could be yellow, "Marginal could be brown and "Unacceptable" could be red. How would I implement that into this expression, if that's even possible? Thanx for your assistance!
View Replies
ADVERTISEMENT
Apr 18, 2006
Hi everybody,
I'm trying to make the backround color of a text box "prova" (short date value) changing according to the values of other two different text boxes "StartDate" and "EndDate" (both are short date values).
I'd like the backround of prova to be blue if its value is between StartDate value and EndDate value.
So in the code builder I made this function:
Private Sub prova_AfterUpdate()
If Me.prova.Value > Me.StartDate.Value & Me.prova.Value < Me.EndDate.Value Then
Me.[prova].BackColor = vbBlue
Else
Me.[prova].BackColor = vbWhite
End If
End Sub
Is that correct?
Thank a slot for your help :confused:
View 4 Replies
View Related
Feb 12, 2005
Hi.
Is that even possible? I have form in datasheet view and text box on it. I need to change color of font in dependency of value of previous record.
Maybe some kind of conditional formatting? Can somebody help?
View 1 Replies
View Related
Jul 21, 2006
I have a CONTINUOUS form that shows all my records. I want it to change the back color of a field when it is a certain value. so far i get it to change back color when the very first record in the list is a certain value, but then it will change the back color for every value and not just one value.
can i fix this?
View 7 Replies
View Related
Dec 21, 2004
This is very close to the label question that I also have posted. I am trying to get my report to have the back ground of some text boxes turn yellow if they are populated. I can get them to turn yellow, but they turn yellow whether they are populated or not. I have the code in the Report Open event. Here is some of the code that I have.
If Not IsNull(MMSJob) Then
MMSJob.BackColor = 65535
Else
MMSJob.BackColor = vbWhite
End If
Can anyone help me?
learnasugo
View 7 Replies
View Related
Dec 21, 2004
I want to change the color of a label based on whether a checkbox is checked or not. Here is the code that I have right now that is not working.
If Not IsNull(MMS) Then
Label16.BackColor = 65535
End If
Can anyone help me out on this one?
learnasugo
View 10 Replies
View Related
Jun 9, 2005
I have a form which uses a query for entry to the table. One of the fields in the query is a calculated field which shows in the form. The calculated field returns a number from 1 to 5. Rather than showing this number I would like to show a round stoplight that changes color for each number. I have inserted a OLE object OLEunbound235 into the form. The colors I want to use are
icolor = RGB(255, 204, 0) 'Gold
icolor = RGB(192, 192, 192) 'Silver
icolor = RGB(216, 129, 0) 'Bronze
icolor = RGB(255, 255, 0) 'Yellow
icolor = RGB(255, 0, 0) 'Red
and icolor = RGB(255, 255, 255) 'White for any other value.
The text box that returns the calculated number is labeled Text1 and I have hidden this box so it can not be seen. Does anyone know how to write this code that would change the OLE object color automatically so when the user enters data into the form and the return number changes the color of the OLE object changes. I know very little about VBA and I am not sure where to begin or where to even write the code.
:confused:
View 2 Replies
View Related
Apr 5, 2005
Hi,
I have design a form using the tab control. I need to add in color to make it more professional. Is there a way I can do it. I realised the filled /Back color icon is faded in color in design view.
Appreciate any help in this. Thanks.
View 2 Replies
View Related
May 30, 2006
How can I indicate with a color change in the label, that a checkbox is checked? I've got it working ...sort of. but when the change occurs it's happening gobally - I want the label to color to apply only to the record I'm viewing. If the check box is checked then the color should be red, otherwise black.
My code is as follows:
Active_Admission.Value = -1 Then
Label1177.ForeColor = vbRed
ElseIf Active_Admission.Value = 0 Then
Labe1177.ForeColor = vbBlack
Exit_Sub_Active_Admission_click:
Exit Sub
End If
End Sub
Also, the condition only works with -1 and 0 - I've read in other places that the condition is 1 and 0. HELP!
LSB
View 4 Replies
View Related
Mar 7, 2006
When using tabbed pages is it possible to change the color of the page?
View 2 Replies
View Related
Jun 14, 2006
(Simplified example)
On a form I have a combo box - let's call it cmboSickness. it has two options "flu" and "malaria". On the same form I have two command buttons - one ehich opens a malaria form and one which opens a flu form. If I select flu then I want the words on the flu command button to change to red. How do I do this and where do I put the code?
I have tried -
If me.cmbosickness=flu then
cmdflu.color=255
but this doesn't work...
View 3 Replies
View Related
Jan 17, 2006
Hi, I have a form and want to change the background color and the record scroll/navigation button colors.
Changing the background color is easy; just go into Design View, right click, and change the "background color" properties.
Changing the record select button (on the bottom of the form) is more a challenge for a newbie like me. Does anyone know how to do this? Thanks
Help appreciated.
View 3 Replies
View Related
Nov 30, 2006
I was wondering if anyone can help.
Please see attached jpg
I need to change the background color of the lead status box when one of the options is selected. i.e. when warm (amber) when Hot (red)
Can anyone help please?
View 5 Replies
View Related
Jan 18, 2005
I have about 25 text boxes on my form that use the dcount or count functions to obtain a number. (Text boxes are labeled 'Text1' through 'Text25')
When the value of the textbox is 0, I would like to have the color of the text box turn red.
Is there a way I can do this using a for loop? Or a with statement?
Checking each one individually just seems like poor programming.
Any thoughts? Ideas?
Thank you.
View 2 Replies
View Related
Oct 10, 2013
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?
View 1 Replies
View Related
May 29, 2015
I have a problem with seting up color for my pivot chart. First I set up color I want(pic 1).but then when I use filter for End Customer all the colors will revert back to default settings (pic2).Is there a way how to force it so it sticks with colors I chose? VBA code?
View 8 Replies
View Related
Aug 14, 2015
I 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 Related
Sep 24, 2013
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?
View 1 Replies
View Related
Jun 26, 2013
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.
View 5 Replies
View Related
Sep 11, 2015
Is it possible to use two color fonts on one label? I want to bring attention to the user that by clicking a certain button they can perform a search by "Name" and by clicking on the other button, they can perform a search by "Appointment".
I have a switchboard type form with some buttons. The two buttons in question are labeled, "Search for Appts by Name" and "Search for Appts by Appointment". I want to keep the "Search for" section of the button in black font, but change the "by Appointment" and "by Name" to red font.
View 3 Replies
View Related
Sep 8, 2013
How do I change the background colors and text formatting in all of the reports in one database at the same time? If this is not possible, is there an easier way to change the report formatting without going through every report?
View 2 Replies
View Related
Oct 31, 2013
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 Related
Sep 11, 2013
I have a report. In this report I have a start date and an end date. I also have a date that is going to be checked. The report checks to see if the date the user entered on a different form is between the start and end date of an individual. if it is, a txt box at the end of the line will turn red. If it isn't the box will stay default of green.
What I would like to do is not even show the lines that have a green box. I want to just show the lines that have boxes as red.
I looked into If statements but I'm not quite sure what event I should put them on, nor am I certain I have the syntax right.
I had it:
If (lblAvailability.BackColor = "#CCB13D" Then
txt1.Visible = False
and so on... making all the txt fields invisible. I would rather have them not even show up because I'm pretty sure invisible things still take up room.
End If
View 1 Replies
View Related
Jan 7, 2015
I'm having a spot of trouble trying to get conditional formatting to work. I have an overview form which displays current quotes going through the system, the QuoteStartTime field is generated from the Now() command.I Would like if possible to show, 1 hour = Green, 2 hours = Amber and 3+ hours Red.
I've tried variations of
hour([QuoteStart])>1
DateAdd("h",1,[QuoteStartTime])
I've done this before with a date only field before, but working with time is taking too much time.
View 1 Replies
View Related
Dec 17, 2013
How to get this expression to work? It works by changing the numbers to correct date format, however, if the field is null, I want a blank to appear instead of "type"
=IIf([DATE_APPLIED_X] Is Null,"""",CDate(Mid([DATE_APPLIED_X],5,2) & "/" & Right([DATE_APPLIED_X],2) & "/" & Left([DATE_APPLIED_X],4)))
Report.JPG
View 10 Replies
View Related
Feb 12, 2014
I have the following Select Statement:
SELECTTenant.ID, Tenant.[First Name], Tenant.[Last Name], Tenant.Address, Tenant.City, Tenant.State, Tenant.Zip, Tenant.[Home Phone], Tenant.[Cell Phone], Tenant.[Work Phone], Tenant.[Rented Unit],
Tenant.[Security Deposit], Tenant.[Move In], Tenant.[Move Out], Tenant.TenantID, Tenant.UnitID, Tenant.PropertyID, Tenant.OwnerID, Owner.Company, Owner.ID AS Expr1, Property.[Property Address],
[code]....
Now, I know that something in the UPDATE statement does not match my select statement.What should my Update Statement be, in order to update all the columns in the joined tables?
View 2 Replies
View Related
