Tengo problemas con esto en la última versión de Excel para Mac.
Aquí está la 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
Cuando lo ejecuto, aparece un error de MSFT Visual Basic:
Run-time error '1004':
Application-defined or object-defined error
Si elimino esta parte, funciona bien, pero no es exactamente lo que necesito en términos del 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
ACTUALIZAR
Si elimino solo esta pequeña parte, la macro se ejecuta, pero no estoy seguro si pierdo algo al eliminar esto:
SearchFormat:=False, _
ReplaceFormat:=False
Respuesta1
Ahh, encontré alguna referencia (en un comentario en SO, y en elForos de EM) que la opción SearchFormat no es válida en la versión Mac de Excel.
Es posible que otros no lo sean también, pero no puedo encontrar ninguna documentación sobre la versión OSX de Office VBA, por lo que no puedo confirmarlo directamente desde MS.