change control back ground color : Form Control « Forms « VBA / Excel / Access / Word






change control back ground color

 
Sub Form_Current()
    Dim ctl as Control
    For Each ctl In Controls
        If TypeOf ctl Is TextBox Then
            If IsNull(ctl.Value) Then
                ctl.BackColor = vbCyan
            Else
                ctl.BackColor = vbWhite
            End If
        End If
    Next ctl
End Sub

 








Related examples in the same category

1.Intrinsic Constant Type of Control
2.Determining the Type of a Control
3.Manipulating a Single Control
4.With...End With construct is often used along with the For Each...Next construct
5.The With...End With statement executes a series of statements on a single object or user-defined type
6.The For Each...Next statement executes a group of statements on each member of an array or collection
7.Change fonts of controls on a form
8.Control Types
9.Controls and Errors