Ejecutar macro al pasar de una hoja a otra

Saludos Gustavo...

podrías ayudarme por favor?

realice una macro para ordenar una columna especifica, pero quiero que esa macro se ejecute cuando pase a otra hoja. La hice de la siguiente manera pero me da el error 1004 en tiempo de ejecución:

Private Sub Worksheet_Deactivate()
'
' ordenar Macro
'
'
Range("C8:C121").Select
Range("C121").Activate
ActiveWorkbook.Worksheets("Cobranza").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Cobranza").Sort.SortFields.Add Key:=Range( _
"C8:C121"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("Cobranza").Sort
.SetRange Range("C7:C121")
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub

por favor..