First of the year
Thanks
"Norman Jones" wrote:
Hi OldJay,
Try:
'=============
Private Sub CommandButton1_Click()
On Error Resume Next
If Evaluate("DateTrigger") < Year(Date) Then
On Error GoTo 0
MsgBox "Year Change!"
Names.Add Name:="DateTrigger", _
RefersTo:=Year(Date)
End If
'your Code e.g.:
MsgBox "Hi"
End Sub
'<<=============
---
Regards,
Norman
"Oldjay" wrote in message
...
I have a macro that runs by a command buttom. I want it to check each time
to see if it's after the first of the year, then display a warning message
and not display the messag again until it detects a new year
oldjay
|