No macro in this.
No docmd.action either.
Basically once the task gets completed and is checked off the next task becomes active and my email button blinks to remind the user to click the email button.
In the onfocus event of the email button i do this:
While FlashEmail = True
Dim timer As Integer
Dim start As Date
start = Now()
timer = 0.1
FlashEmail = True
Do While FlashEmail = True
If Now() > DateAdd("s", timer, start) Then
Me.cmdEmail.Transparent = Not Me.cmdEmail.Transparent
start = Now()
End If
DoEvents
Loop
Wend
The reason this triggers is because I set the focus to this button in some code. So the button blinks.
In the lost focus event I have:
FlashEmail = False
Me.cmdEmail.Transparent = False
Now this works BUT it works after I get one of those validation rule errors that I posted. I dont want to see any of these errors.
Jon