Ich habe damit Probleme mit der neuesten Version von Excel für Mac.
Hier ist das Makro:
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
Wenn ich es ausführe, erhalte ich einen MSFT Visual Basic-Fehler:
Run-time error '1004':
Application-defined or object-defined error
Wenn ich diesen Teil entferne, läuft es zwar einwandfrei, aber das Endergebnis entspricht nicht genau meinen Anforderungen:
Sheets("Data").Select
Cells.Select
Range("BK1").Activate
Selection.Replace What:="unknown", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
AKTUALISIEREN
Wenn ich nur diesen kleinen Teil entferne, wird das Makro ausgeführt. Ich bin mir jedoch nicht sicher, ob ich durch das Entfernen etwas verliere:
SearchFormat:=False, _
ReplaceFormat:=False
Antwort1
Ahh, habe eine Referenz gefunden (in einem Kommentar zu SO, und in derMS-Foren), dass die Option SearchFormat in der Mac-Version von Excel nicht gültig ist.
Bei anderen ist das vielleicht nicht so gut, aber ich kann keine Dokumentation zur OSX-Version von Office VBA finden und kann es daher nicht direkt von MS bestätigen.