PreviousSelection

Porqué no funciona esta llamada a selecciones previas ?


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo noSelections
For j = LBound(Application.PreviousSelections) To _
UBound(Application.PreviousSelections)
MsgBox Application.PreviousSelections(j).Address
Next j
Exit Sub
On Error GoTo noSelections

noSelections:
MsgBox "There are no previous selections"
End Sub

Gracias.