pls try thisPrivate Sub SetColor (cbox As ComboBox)If cbox.Value = "Please Select" Thencbox.BackColor = &H80FFFFElsecbox.BackColor = &HFFFFFFEnd IfEnd Sub