Changing Font For Control . . .

[roccorocks]

I am trying to figure out a way to change the font "type" or "color" based off of certain criteria that is contained within the controls Source. For example, if I have a "Critical" value, I would like to have that info show as BOLD or RED. If I have a "Caution" value, would like it to show ast Italics or YELLOW. Thanks.

 

[Remou]

If you are using a continuous form, you might like to look at Conditional formatting. If not, here are a few ideas:

Private Sub cboCombo_AfterUpdate()
If Me.cboCombo = "Critical" Then
  Me.txtText.FontName = Me.cboFont '"Times New Roman"
  Me.txtText.FontSize = 14
  Me.txtText.BackColor = vbRed
End If
End Sub