Excel VBA - экспортировать тот же диапазон, измененный функцией, в файл PDF - PullRequest
0 голосов
/ 31 октября 2019

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

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

Я пытался использовать массивы, но я не знаю, как реализовать его в этом конкретном случае.

Dim i As Long
For i = 1 To 3
    Call function_to_change_values 'this function change the values of range A1 to D5
    'config printing:
    ActiveSheet.PageSetup.PrintArea = "$A$1:$D$5" 'print area
    Application.PrintCommunication = False
    With ActiveSheet.PageSetup
        .Orientation = xlLandscape
        .Zoom = 77
        .Draft = False
        .PaperSize = xlPaperA4
    End With
    'create PDF:
    ActiveSheet.ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:="C:\myfile.pdf", _
        Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, _
        OpenAfterPublish:=False
Next i

Большое спасибо за помощь

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