2

У меня проблемы с этим в последней версии Excel для Mac.

Вот макрос:

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

Когда я запускаю его, я получаю ошибку MSFT Visual Basic:

 Run-time error '1004':

 Application-defined or object-defined error

Если я уберу эту часть, она будет работать нормально, но это не совсем то, что мне нужно с точки зрения конечного результата:

Sheets("Data").Select
    Cells.Select
    Range("BK1").Activate
    Selection.Replace What:="unknown", Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

ОБНОВИТЬ

Если я удаляю только эту небольшую часть, макрос запускается, но не уверен, что потеряю что-нибудь, удалив это:

SearchFormat:=False, _
    ReplaceFormat:=False

1 ответ1

2

Ааа, нашел какую-то ссылку (в комментарии к SO и на форумах MS), что опция SearchFormat недопустима в Mac-версии Excel.

Другие, возможно, не так хороши, но я не могу найти никакой документации по OSX-версии Office VBA, поэтому я не могу подтвердить это непосредственно из MS.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .