Examples of Activation Events
Private Sub Worksheet_Activate() MsgBox "You just activated " & ActiveSheet.Name End Sub