У меня есть кнопка сохранения pdf, которая сохранит все страницы на Sheet1 и Sheet2. Теперь проблема в том, что я не могу заставить код VBA сохранять только первую страницу каждого листа, а не сохранять страницы 1, 2 и 3 каждого листа.
Я создал кнопку «Сохранить как PDF», которая сохранит «Лист1» и «Лист2», но при этом все страницы будут напечатаны на каждом листе. Все, что мне нужно, это сохранить одну страницу для каждого листа.
Private Sub PrintAllInvoices()
Dim FolderPath As String
FolderPath = "C:\Users\MyComputer\Desktop\PDFs"
MkDir FolderPath
Sheets(Array("Sheet1", "Sheet2")).Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=FolderPath & "\Sales", _
OpenAfterPublish:=False, IgnorePrintAreas:=False, From:=1, To:=1
MsgBox "All PDF's have been successfully exported."
End Sub
Я ожидаю, что при сохранении PDF-файла будут сохранены Sheet1 (Страница 1) и Sheet2 (Страница 1). Я хочу, чтобы сохранялась только первая страница каждого листа.