Occurs when the selection changes on a worksheet.
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Target The new selected range.
Example
This example scrolls through the workbook window until the selection is in the upper-left corner of the window.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With ActiveWindow
.ScrollRow = Target.Row
.ScrollColumn = Target.Column
End With
End Sub