У цій статті я покажу вам, як можна роздрукувати будь-який документ в PDF за допомогою VBA в Excel. Ми використаємо Експорт у фіксованому форматі t метод визначення VBA Для цього я розповім про всі параметри цього методу з відповідними прикладами та ілюстраціями.

Друк в PDF в Excel VBA (Швидкий перегляд)

Завантажити Практичний посібник

Завантажте цей практичний посібник, щоб потренуватися, поки ви читаєте цю статтю.

Вступ до оператора "Експорт у фіксованому форматі

⧭ Огляд:

На сьогоднішній день, на жаль, це не так. Експорт у фіксованому форматі t метод визначення VBA зберігає будь-який заданий документ у форматі PDF із заданим ім'ям з VBA Це досить корисний метод для тих, хто працює з великою кількістю таблиць Excel і зберігає їх про запас.

⧭ Синтаксис:

Синтаксис мови VBA Експорт у фіксованому форматі метод такий:

 Документ.ЕкспортУФіксованийФорматТип, Ім'яФайлу, Якість, ВключитиВластивостіДокумента, ІгноруватиДілянкиДруку, З, В, ВідкритиПісляОпублікування 

⧭ Параметри:

⧭ Значення, що повертається:

Конвертує аркуші книги Excel в PDF-документ і зберігає його у вказану папку із зазначеним ім'ям.

5 Приклади друку в PDF в Excel VBA з оператором ExportAsFixedFormat

Розглянемо кілька прикладів того, як роздрукувати документ в PDF в Excel VBA з Експорт у фіксованому форматі метод.

Приклад 1: Друк у PDF в Excel VBA без вказівки імені або шляху

Перед нами аркуш з книжковими записами книгарні під назвою "Книжковий магазин Марін".

Напишемо просту формулу VBA код для перетворення аркуша в PDF-документ, не вказуючи ні імені, ні шляху.

⧭ код VBA:

 Sub Print_To_PDF() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF End Sub 

⧭ Вихід:

Запустіть цей код, і ви побачите PDF-файл з тим же ім'ям, що і ваша робоча книга (ім'я за замовчуванням, якщо ім'я не вказано), в тій же папці, що і ваша робоча книга (папка за замовчуванням, якщо шлях не вказано).

У нас він називається Book1.pdf як називалася моя робоча книжка Книга 1 .

Читати далі: Excel VBA: як встановити область друку динамічно (7 способів)

Приклад 2: Друк у PDF в Excel VBA із зазначенням імені та шляху

Тепер перетворимо цю ж книгу в інший PDF-файл, вказавши ім'я і шлях.

Я збережу PDF-файл з назвою "Martin Bookstore.pdf" на шляху C:\Users\Public\ExcelWIKI на моєму комп'ютері. VBA код буде:

⧭ код VBA:

 Sub Print_To_PDF() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\Public\ExcelWIKI\Martin Bookstore.pdf" End Sub 

⧭ Вихід:

Цей код збереже PDF-документ по шляху C:\Users\Public\ExcelWIKI на моєму комп'ютері з ім'ям Книгарня "Мартін".pdf .

Читати далі: Як надрукувати виділену область в Excel (2 приклади)

Схожі читання:

• Як надрукувати заголовки в Excel (5 простих способів)
• Друк таблиці з коментарями в Excel (5 простих способів)
• Як роздрукувати виділені клітинки в Excel (2 простих способи)
• Центрування області друку в Excel (4 способи)
• Як відобразити попередній перегляд друку за допомогою Excel VBA (3 макроси)

Приклад 3: Друк в PDF в Excel VBA з відкриттям файлу після публікації

Тепер роздрукуємо документ в PDF таким чином, щоб файл відкривався після публікації. Для цього встановимо OpenAfterPublish параметр до Правда .

Тож, на сьогоднішній день VBA код буде,

⧭ код VBA:

 Sub Print_To_PDF() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\Public\ExcelWIKI\Martin Bookstore.pdf", _ OpenAfterPublish:=True End Sub 

⧭ Вихід:

Цей код збереже PDF-документ по шляху C:\Users\Public\ExcelWIKI на моєму комп'ютері з ім'ям Книгарня "Мартін".pdf і відкрийте файл одразу після його публікації.

Пов'язаний контент: Як налаштувати попередній перегляд друку в Excel (6 варіантів)

Приклад 4: Друк кількох аркушів у кілька файлів PDF в Excel VBA

Досі ми друкували один аркуш, цього разу ми надрукуємо декілька аркушів у декілька PDF-файлів.

Тут у нас є робочий зошит з 5 робочі аркуші, кожен з яких містить книжковий облік конкретної книгарні.

Цього разу ми конвертуємо всі робочі аркуші в PDF-файли.

На сьогоднішній день, на жаль, це не так. VBA код буде:

⧭ код VBA:

 Sub Print_Multiple_Sheets_To_PDF() Sheet_Names = InputBox("Введіть імена робочих аркушів для друку в PDF: ") Sheet_Names = Split(Sheet_Names, ", ") For i = LBound(Sheet_Names) To UBound(Sheet_Names) Worksheets(Sheet_Names(i)).ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\Public\ExcelWIKI\" + Sheet_Names(i) + ".pdf" Next i EndSub 

⧭ Вихід:

Запускаємо код, у вікні вводу з'являється вікно, в якому потрібно ввести назви аркушів, які потрібно конвертувати в PDF. Я ввів Книгарня "Джозеф", книгарня "Морган", книгарня "Анжела .

Натисніть ГАРАЗД. І збереже їх у вигляді PDF-файлів у папці C:\Users\Public\ExcelWIKI .

Читати далі: Як надрукувати кілька аркушів в Excel (7 різних способів)

Приклад 5: Розробка користувацької функції для друку в PDF-файл в Excel VBA

Нарешті, я покажу вам, як можна розробити призначену для користувача функцію для друку будь-якого робочого аркуша в PDF за допомогою Excel VBA .

Розробимо функцію з назвою PrintToPDF яка надрукує активний аркуш у PDF-файл.

На сьогоднішній день, на жаль, це не так. VBA код буде:

⧭ код VBA:

 Функція PrintToPDF() ActiveSheet.ExportAsFixedFormat Тип:=xlTypePDF, _ Ім'я файлу:="C:\Users\Public\ExcelWIKI\Martin Bookstore.pdf" Кінець функції 

⧭ Вихід:

Введіть цю функцію в будь-яку комірку робочого аркуша.

Потім натисніть ENTER Це перетворить активний аркуш ( Книгарня "Мартин тут) до PDF-файлу у вказаній папці.

Читати далі: Excel VBA: друкуємо користувацьку форму так, щоб вона вмістилася на сторінці (2 способи)

Важливі моменти для запам'ятовування

При розробці кодексів ми здебільшого використовували ActiveSheet об'єкт VBA Повертає аркуш, який є активним на даний момент в активній книзі.

Також іноді ми користувалися майном ActiveSheet.Name Повертає назву активного аркуша.

Висновок

Отже, це спосіб надрукувати будь-який аркуш у PDF за допомогою VBA У вас залишилися питання? Задавайте їх нам. І не забувайте заходити на наш сайт ExcelWIKI для отримання додаткової інформації та оновлень.