Печать PDF в л oop из Excel - PullRequest
0 голосов
/ 20 апреля 2020

Я относительно новичок в VBA, и я хотел бы найти код для печати в PDF всех версий листов, проходящих по всем значениям поля сводной таблицы.

Каждый раз, когда я изменяю значение определенного поля сводной таблицы, обновляются все графики листа, и я хотел бы напечатать для каждой версии файл PDF, названный в качестве значения в сводной таблице.

В этом поле содержится около 300 значений, поэтому я должен получить 300 файлов PDF, сохраненных в определенной папке.

Я видел, что есть несколько похожих вопросов, я пытался использовать разные коды, просто вставляя их и изменение имен различных полей, таблиц и т. д. c. но он не работает, так как мой уровень в предмете не так хорош.

Кто-нибудь может мне помочь?

Это макрос, который я записал, выбрав одно значение и напечатав его.

Sub test1()
'
' test1 Macro
'

'
    ActiveSheet.PivotTables("PT Sector").PivotFields("Fund Sector").ClearAllFilters
    ActiveSheet.PivotTables("PT Sector").PivotFields("Fund Sector").CurrentPage = _
        "Asset Allocation"
    Calculate
    Columns("U:Z").Select
    Selection.ColumnWidth = 11.57
    Range("AC23").Select
    ActiveWindow.SmallScroll Down:=48
    Range("AA77").Select
    Selection.AutoFill Destination:=Range("AA77:AA79"), Type:=xlFillDefault
    Range("AA77:AA79").Select
    Calculate
    ActiveWindow.SmallScroll Down:=-24
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
        IgnorePrintAreas:=False
End Sub

Как я могу oop пройти через все значения?

Идеи, как это сделать с Python Istead?

Большое спасибо заранее!

Best, Ema

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...