Eu criei um arquivo com a mesma macro no Excel 2016 para enviar para as pessoas da minha empresa. Os usuários do Excel 2010 conseguiram usar a macro no mês passado, mas quando enviei um arquivo com a mesma macro hoje, eles estão recebendo a mensagem "erro de tempo de execução 438". Todos os usuários que estão em 2016 não estão tendo problemas. Apenas aqueles em 2010.
A Microsoft fez algum tipo de atualização que não permite que os usuários de 2010 executem macros criadas em 2016?
Este é o código que estou usando:
Sub Planning_Commercial_September()
'
' Planning_Commercial_September Macro
'
'
ActiveWorkbook.Worksheets("Planning").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Planning").AutoFilter.Sort.SortFields.Add2 Key:= _
Range("M11:M25916"), SortOn:=xlSortOnValues, Order:=xlDescending, _
DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Planning").AutoFilter.Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
ActiveSheet.Range("$A$11:$U$25916").AutoFilter Field:=21, Criteria1:=Range("B4")
End Sub
Sub Bidding_Commercial_September()
'
' Bidding_Commercial_September Macro
'
'
ActiveWorkbook.Worksheets("Bidding").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Bidding").AutoFilter.Sort.SortFields.Add2 Key:= _
Range("L11:L3617"), SortOn:=xlSortOnValues, Order:=xlDescending, _
DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Bidding").AutoFilter.Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
ActiveSheet.Range("$A$11:$T$3617").AutoFilter Field:=20, Criteria1:=Range("B4")
End Sub