4523756273

Chapter 11: Automatic Procedures and Events
167
In this case, Sh is the argument passed to the procedure and is a variable that
represents the sheet in the activated workbook. Examples in this chapter
clarify this point.
Introductory Examples
In this section, I provide a few examples so that you can get the hang of this
event-handling business.
The Open event for a workbook
One of the most commonly used events is the Workbook Open event. Assume
that you have a workbook that you use every day. The Workbook_Open
procedure in this example is executed every time the workbook is opened.
The procedure checks the day of the week; if it’s Friday, the code displays a
reminder message for you.
To create the procedure that is executed whenever the Workbook Open
event occurs, follow these steps:
1. Open the workbook.
Any workbook will do.
2. Press Alt+F11 to activate the VBE.
3. Locate the workbook in the Project window.
4. Double-click the project name to display its items, if necessary.
5. Double-click the ThisWorkbook item.
The VBE displays an empty Code window for the ThisWorkbook object.
6. In the Code window, select Workbook from the Object (left) dropdown
list.
The VBE enters the beginning and ending statements for a Workbook_
Open procedure.
7. Enter the following statements, so the complete event-procedure looks
like this:
Private Sub Workbook_Open()
Dim Msg As String
If WeekDay(Now) = 6 Then
Msg = “Today is Friday. Make sure that you “
Msg = Msg & “do your weekly backup!”
MsgBox Msg
End If
End Sub