The term 'Excel Events' refers to specific actions that a user carries out in Excel. For example, if the user selects a Worksheet, this is an event. Similarly, entering data into a cell or saving a Workbook are also Excel events.
Events are linked to Excel Worksheets, Charts, Workbooks, or to the Excel Application itself. This enables the programmer to create vba code to be executed automatically at the time of an event.
For example, if you wanted to run a macro every time a user selected any Worksheet in the Workbook, this could be done by writing vba code that is linked to the Workbook event "SheetActivate".
Alternatively, if you wanted to run a macro every time a specific Worksheet (eg. "Sheet1") was selected, you would link your code to the Worksheet event "Activate" for Sheet1.
If you click on an event in the drop-down menu above the vba code window, a Sub procedure will automatically be inserted into the code window for that object. The arguments that Excel automatically feeds into that function (if there are any) are included into the Sub header - you then just need to add the vba code to define what you want to do when that event is fired.
The following example displays a message box every time the cell B1 in the Worksheet "Sheet1" is selected.
For this action, we need to use the Worksheet Event "Selection_Change", which 'fires' every time a different cell or range of cells is selected. The "Selection_Change" function receives, as an argument, a Range object called "Target". This tells you the range of cells that has been selected.
As the "Selection_Change" event relates to any new selection, we need to check the supplied Range, 'Target', as soon as the function is called, to make sure that the required actions are performed, only when cell B1 is selected. The code for this is shown below:
|' Code to display a Message Box if Cell B1 of the current|
' Worksheet is selected.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' Check if the selection is cell B1
If Target.Count = 1 And Target.Row = 1 And Target.Column = 2 Then
' The selection IS cell B1, so carry out required actions
MsgBox "You have selected cell B1"