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 that is executed automatically at the time of an event.
For example, if you wanted to run a macro every time a user selects any Worksheet in the Workbook, this could be done by writing vba code that is linked to the Workbook event "SheetActivate".
Open up the VBA Editor (by pressing the keyboard combination Alt + F11 ) and open up the code window for the object that you want to link code to. For example, if you want to execute a section of code every time a specific worksheet event occurs, you should open up the code window for that worksheet.
Click on the drop-down menu, at the top left of the code window and select the object type (e.g. Worksheet). The dropdown menu on the right will then display the events that are defined for that object.
Select an event from the top right drop-down menu. This causes a Sub procedure to be automatically inserted into the code window. The arguments that Excel automatically supplies to that function (if there are any) are included into the Sub header, so you just need to add the vba code to define what you want to do when that event occurs.
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 "SelectionChange", which occurs every time a different cell or range of cells is selected. The "Worksheet_SelectionChange" Sub procedure receives, as an argument, a Range object called "Target". This stores the range of cells that has been selected.
' 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 B1End Sub
If Target.Count = 1 And Target.Row = 1 And Target.Column = 2 Then
' The selection IS cell B1, so carry out required actionsEnd If
MsgBox "You have selected cell B1"