Conditional formatting of ForeColor in VBA

[ilovelagar]

Hi,

I need the ForeColor of a checkbox text on a userform to change colour depending on certain criteria. Here's the code I have:

Please Login or Register  to view this content.

The issue is that tbEffectiveDOT is reading from a cell, and the cell contains a formula (the formula being "=J28"). So no matter what it's always > 0.

What I would like is, if tbEffectiveDOT is empty or equals a default value, the forecolor of cbBillExclusion stays black, but if not empty or doesn't equal the default value, then the forecolor should change to red.

Any ideas?

Cheers,

[StephenR]

Why not directly reference the cell? E.g.

Please Login or Register  to view this content.

[ilovelagar]

Why not directly reference the cell? E.g.

Please Login or Register  to view this content.

Because the userform is just reading the column and activecell (this case it's on J28). When the user clicks "next" on the userform, it'll jump to "J29".

Please Login or Register  to view this content.

[StephenR]

OK, so replace the J28 with the textbox in what I outlined. Are you asking how to structure an If/Or statement?

[ilovelagar]

OK, so replace the J28 with the textbox in what I outlined. Are you asking how to structure an If/Or statement?

Your outline has partially worked:

Please Login or Register  to view this content.

When I click "next" on the userform, cbBillExclusion turns red when tbPolicyNumber is empty, but then it stays red. If I keep clicking next and then there is something in tbPolicyNumber, cbBillExclusion stays red (but I need it to go back to black).

[StephenR]

You were pretty much there with your first post. You forgot to add the Else bit, so incorporate the Or part into your Else line and you should be home and dry.