Check for date
On Tue, 9 Aug 2005 08:02:05 -0700, Kjeldc
wrote:
Memberfee is due every 1. day of month. How do I make a automatic check for
the date when the workbook open?
Right click on some worksheet tab and select View Code.
In the project explorer window, select the line in your project that says "This
Workbook". Double click on that line and paste the code below into the window
that opens:
====================================
Private Sub Workbook_Open()
If Day(Date) = 1 Then
MsgBox ("Member Fee Due")
End If
End Sub
================================
Obviously, you may want to pretty this up a bit. But event-driven macros are
the key, here.
--ron
|