Una macro auto ejecutable que funciona perfectamente en windows pero en un mac no

Hola tengo una macro auto ejecutable que funciona perfectamente en windows pero en un mac no , la macro es esta

Private Sub worksheet_activate()

Application.ScreenUpdatin=False

ActiveWorkbook.Worksheets("Hoja2").AutoFilter.Sort.SortFields.Clear ActiveWorkbook.Worksheets("Hoja2").AutoFilter.Sort.SortFields.Add Key:=Range( _ "B2:B1500"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _

xlSortNormal With ActiveWorkbook.Worksheets("Hoja2").AutoFilter.Sort

.Header = xlYes

.MatchCase = False

.Orientation = xlTopToBottom

.SortMethod = xlPinYin

.Apply

End With

ActiveSheet.Protect DrawingObjects:=True,Contents:=True,Scenarios:=True

Application.ScreenUpdating = True

'

End Sub

Esta macro me ordena una serie de datos de una hoja pero cuando esta funcionando en mac no lo hace , bueno si lo hace si lo hago manualmente es decir: Si pico con el ratón directamente en la hoja, me ordena los datos , pero si lo hago a través de un hipervínculo asociado a dicha hoja , no funciona.

Tengo que modificar algo en la macro para que funcione en mac, o bien hay que hacer alguna otra cosa.

Gracias de antemano por atender mi pregunta.