Блог

Главная - Вопросы по программированию - Знаю, как экспортировать несколько листов в один PDF без .Выберите и .Активная рабочая тетрадь?

Знаю, как экспортировать несколько листов в один PDF без .Выберите и .Активная рабочая тетрадь?

#excel #vba #pdf #export

Вопрос:

Я нашел только этот код. Можно ли вместо них ссылаться на конкретное название 2 листов .select ? Объединить область печати страниц или что-то подобное?

Я не могу ввести несколько листов в .ExportAsFixedFormat 

 Sub SelectSheetsAndSaveAsPDF()

'Create and assign variables
Dim saveLocation As String
Dim sheetArray As Variant

saveLocation = "C:UsersmarksOneDriveDocumentsmyPDFFile.pdf"
sheetArray = Array("Sheet1", "Sheet2")

'Select specific sheets from workbook, the save all as PDF
Sheets(sheetArray).Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
    Filename:=saveLocation

End Sub

Комментарии:

1. Что плохого в Select том, чтобы их съесть? sheetArray = Array("Sheet1", "Sheet2") указывает 2 листа по названию. Не уверен, в чем ваша проблема.

2. Я задаюсь вопросом, можно ли избежать объявления об активах и выбрать во время этой операции.

3. Я в это не верю.

Метки: ,