I have this generel sub to flashing of a control on a form ,,, flash in a specific color:
Sub FlashCtrl(OnOff As Boolean, frm As Form, Ctl As Control, Optional flashColor As Long)
If OnOff = False Then
frm.TimerInterval = 0
frm.Controls(Ctl.Name).Visible = False
Else...