Estou tendo problemas com isso na versão mais recente do Excel para Mac.
Aqui está a macro:
Sub Run()
'
' Run Macro
'
'
Sheets("Data").Select
Cells.Select
Range("BK1").Activate
Selection.Replace What:="unknown", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Sheets("Pivot Table").Select
ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh
ActiveSheet.PivotTables("PivotTable2").PivotCache.Refresh
ActiveSheet.PivotTables("PivotTable3").PivotCache.Refresh
ActiveSheet.PivotTables("PivotTable4").PivotCache.Refresh
Sheets("Formatted Data").Select
ActiveWorkbook.Worksheets("Formatted Data").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Formatted Data").AutoFilter.Sort.SortFields.Add Key _
:=Range("A4"), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:= _
xlSortNormal
With ActiveWorkbook.Worksheets("Formatted Data").AutoFilter.Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub
Quando o executo, recebo um erro do MSFT Visual Basic:
Run-time error '1004':
Application-defined or object-defined error
Se eu remover esta parte, ela funcionará bem, mas não é exatamente o que preciso em termos de resultado final:
Sheets("Data").Select
Cells.Select
Range("BK1").Activate
Selection.Replace What:="unknown", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
ATUALIZAR
Se eu remover apenas esta pequena parte, a macro será executada, mas não tenho certeza se perco alguma coisa removendo isto:
SearchFormat:=False, _
ReplaceFormat:=False
Responder1
Ahh, encontrei alguma referência (em um comentário no SO, E noFóruns de MS) que a opção SearchFormat não é válida na versão Mac do Excel.
Outros podem não estar tão bem, mas não consigo encontrar nenhuma documentação sobre a versão OSX do Office VBA, então não posso confirmá-la diretamente do MS.