Conditinal Format Not Working

  • Thread starter Thread starter Dee
  • Start date Start date
D

Dee

I am trying to get a field to turn red if the condition is "High"
I tried using the conditional formatting and it does not work. I also tried
using the below vba code and this does not work either. I tried it in the
after update procedure and the on current procedure with no luck. Could this
be an Access bug?

Private Sub Critical_AfterUpdate()
If Me.Critical = "High" Then
Me.Critical.ForeColor = vbRed
End If
End Sub
 
Dee,
Is Critical a manually entered text control? Or a Combo... or a List?
Is it bound to a text field? Details please...
Your code, although faulty (so far), should have (at least) turned
Critical to red
after an update with "High" See below for further tweaking of that code...
Also, what version of Access are you using... and if 2000 or greater...
have
you tried Conditional Formatting?
------------------
You'll also need to indicate what color you want Critical, if it's not
"High."
Otherwise, once you've turned Critical red, and go to another record... that
value will be red too... regardless whether it's "High" or not.

And... you'll also need to have that same code in the OnCurrent event of
the form, so that when you arrive at a record with Critical = "High", the
text
is made red. And if not, the text would be made black.

Private Sub Critical_AfterUpdate()
If Me.Critical = "High" Then
Me.Critical.ForeColor = vbRed
Else
Me.Critical.ForeColor = vbBlack
End If
End Sub
Click to expand...
--
hth
Al Campagna
Microsoft Access MVP 2007-2009
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your life."
 
Yes, I tried conditional formatting first since that would be the easiest and
quickest - so I thought - but it did not work. So then I tried the vba code
and that did not work. I also tried using your code in both the combo box
after update event and the forms on current event. Nothing happens. I dont
get any errors.(critical is the como box - in a single form). I am using
Access version 2007.

I tested the conditional formatting using "field has focus" and that works -
but not the "expression is"
 
Dee,
I suspected that this was a combo box, because a text control with
"High" in it would have at least gone red after entereing "High".
Sounds like what is "displayed" in Critical is not what the real value
of Critical is.
Please describe your combo in detail... Columns, NoOfCols, ColWidths,
etc...

And try this...
If the your combo is named Critical, then place an unbound text
control on the form, and give it a ControlSource of...
= [Critical]

**When you set the value of combo Critical, what does the text control
indicate?
**Does it display "High" when "High" is selected in Critical?
**Is Critical a Lookup field in your table design?
--
hth
Al Campagna
Microsoft Access MVP 2007-2009
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your life."
 
Al,

It is a look up field, so I changed "high" to its number value and it now it
works in both the conditional format and in vba.

Thank you!

Al Campagna said:
Dee,
I suspected that this was a combo box, because a text control with
"High" in it would have at least gone red after entereing "High".
Sounds like what is "displayed" in Critical is not what the real value
of Critical is.
Please describe your combo in detail... Columns, NoOfCols, ColWidths,
etc...

And try this...
If the your combo is named Critical, then place an unbound text
control on the form, and give it a ControlSource of...
= [Critical]

**When you set the value of combo Critical, what does the text control
indicate?
**Does it display "High" when "High" is selected in Critical?
**Is Critical a Lookup field in your table design?
--
hth
Al Campagna
Microsoft Access MVP 2007-2009
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your life."

Dee said:
Yes, I tried conditional formatting first since that would be the easiest
and
quickest - so I thought - but it did not work. So then I tried the vba
code
and that did not work. I also tried using your code in both the combo box
after update event and the forms on current event. Nothing happens. I
dont
get any errors.(critical is the como box - in a single form). I am using
Access version 2007.

I tested the conditional formatting using "field has focus" and that
works -
but not the "expression is"
Click to expand...


.
Click to expand...
 
Very good! I avoid Loookup fields... just for that reason.
Too con-foosing...
Al

Dee said:
Al,

It is a look up field, so I changed "high" to its number value and it now
it
works in both the conditional format and in vba.

Thank you!

Al Campagna said:
Dee,
I suspected that this was a combo box, because a text control with
"High" in it would have at least gone red after entereing "High".
Sounds like what is "displayed" in Critical is not what the real
value
of Critical is.
Please describe your combo in detail... Columns, NoOfCols, ColWidths,
etc...

And try this...
If the your combo is named Critical, then place an unbound text
control on the form, and give it a ControlSource of...
= [Critical]

**When you set the value of combo Critical, what does the text control
indicate?
**Does it display "High" when "High" is selected in Critical?
**Is Critical a Lookup field in your table design?
--
hth
Al Campagna
Microsoft Access MVP 2007-2009
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your
life."

Dee said:
Yes, I tried conditional formatting first since that would be the
easiest
and
quickest - so I thought - but it did not work. So then I tried the vba
code
and that did not work. I also tried using your code in both the combo
box
after update event and the forms on current event. Nothing happens. I
dont
get any errors.(critical is the como box - in a single form). I am
using
Access version 2007.

I tested the conditional formatting using "field has focus" and that
works -
but not the "expression is"

:

Dee,
Is Critical a manually entered text control? Or a Combo... or a
List?
Is it bound to a text field? Details please...
Your code, although faulty (so far), should have (at least) turned
Critical to red
after an update with "High" See below for further tweaking of that
code...
Also, what version of Access are you using... and if 2000 or
greater...
have
you tried Conditional Formatting?
------------------
You'll also need to indicate what color you want Critical, if it's
not
"High."
Otherwise, once you've turned Critical red, and go to another
record...
that
value will be red too... regardless whether it's "High" or not.

And... you'll also need to have that same code in the OnCurrent
event
of
the form, so that when you arrive at a record with Critical = "High",
the
text
is made red. And if not, the text would be made black.

Private Sub Critical_AfterUpdate()
If Me.Critical = "High" Then
Me.Critical.ForeColor = vbRed
Else
Me.Critical.ForeColor = vbBlack
End If
End Sub
--
hth
Al Campagna
Microsoft Access MVP 2007-2009
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your
life."


I am trying to get a field to turn red if the condition is "High"
I tried using the conditional formatting and it does not work. I
also
tried
using the below vba code and this does not work either. I tried it
in
the
after update procedure and the on current procedure with no luck.
Could
this
be an Access bug?

Private Sub Critical_AfterUpdate()
If Me.Critical = "High" Then
Me.Critical.ForeColor = vbRed
End If
End Sub


.
Click to expand...


.
Click to expand...
Click to expand...
 
Back
Top