Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.62/125: Рейтинг темы: голосов - 125, средняя оценка - 4.62
Ушел с CyberForum совсем!
874 / 183 / 25
Регистрация: 04.05.2011
Сообщений: 1,020
Записей в блоге: 110

Макрос для склеивания PDF файлов

20.11.2013, 18:32. Показов 26959. Ответов 24
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Коллеги, есть вопрос:

например есть 2 документа в разных приложениях например в визио и экселе. можно ли в каком нибудь из pdf-принтеров создать пдф из каждого документа и их объединить в один файл ?
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
20.11.2013, 18:32
Ответы с готовыми решениями:

Макрос для поиска текста в PDF и копирования в excel
добрый день! посталена вот такая задача, хотел бы ей как-то автоматизировать, что можете посоветовать? Нужно наити и скопировать...

Как переделать макрос так, что бы после слияния Word создавал PDF и сохранял в PDF каждый раздел отдельно?
Добрый вечер всем! Помогите переделать макрос что бы после слияние, word создавал PDF и сохранял в PDF по отдельности. Данный макрос...

Макрос для отправки письма в формате PDF через Excel
Добрый вечер, 1. Помогите пожалуйста скорректировать макрос, так чтобы он вкладывал в письмо файл Excel в формате PDF (Лист - SP) ...

24
6998 / 2896 / 555
Регистрация: 19.10.2012
Сообщений: 8,804
30.12.2013, 12:58
Студворк — интернет-сервис помощи студентам
Не пойму - так мой вариант в таком варианте почему не попробовали?
Visual Basic
1
2
3
Sub MergePDF()
    ShellAndWait "c:\полный путь к\pdftk.exe c:\Temp\post_320347.pdf c:\Temp\post_322722.pdf cat output c:\Temp\combined.pdf", vbHide
End Sub
Вполне себе работает.
А опций у этого pdftk...
Вот из справки:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Examples
            Merge Two or More PDFs into a New Document
                pdftk 1.pdf 2.pdf 3.pdf cat output 123.pdf
            or (Using Handles):
                pdftk A=1.pdf B=2.pdf cat A B output 12.pdf
            or (Using Wildcards):
                pdftk *.pdf cat output combined.pdf
            Split Select Pages from Multiple PDFs into a New Document
                pdftk A=one.pdf B=two.pdf cat A1-7 B1-5 A8 output combined.pdf
            Rotate the First Page of a PDF to 90 Degrees Clockwise
                pdftk in.pdf cat 1E 2-end output out.pdf
            Rotate an Entire PDF Document's Pages to 180 Degrees
                pdftk in.pdf cat 1-endS output out.pdf
            Encrypt a PDF using 128-Bit Strength (the Default) and Withhold All Permissions (the Default)
                pdftk mydoc.pdf output mydoc.128.pdf owner_pw foopass
            Same as Above, Except a Password is Required to Open the PDF
                pdftk mydoc.pdf output mydoc.128.pdf owner_pw foo user_pw baz
            Same as Above, Except Printing is Allowed (after the PDF is Open)
                pdftk mydoc.pdf output mydoc.128.pdf owner_pw foo user_pw baz allow printing
            Decrypt a PDF
                pdftk secured.pdf input_pw foopass output unsecured.pdf
            Join Two Files, One of Which is Encrypted (the Output is Not Encrypted)
                pdftk A=secured.pdf mydoc.pdf input_pw A=foopass cat output combined.pdf
            Uncompress PDF Page Streams for Editing the PDF Code in a Text Editor
                pdftk mydoc.pdf output mydoc.clear.pdf uncompress
            Repair a PDF's Corrupted XREF Table and Stream Lengths (If Possible)
                pdftk broken.pdf output fixed.pdf
            Burst a Single PDF Document into Single Pages and Report its Data to doc_data.txt
                pdftk mydoc.pdf burst
            Report on PDF Document Metadata, Bookmarks and Page Labels
                pdftk mydoc.pdf dump_data output report.txt
1
 Аватар для raxper
10237 / 6615 / 498
Регистрация: 28.12.2010
Сообщений: 21,154
Записей в блоге: 1
30.12.2013, 16:39
...склеивал ghostscript-ом:
Bash
1
2
3
4
5
6
7
@echo off
setlocal enabledelayedexpansion
set str=
if not exist *.pdf goto quit
for %%i in (*.pdf) do set str=!str! %%i
gswin32 -r600 -dBATCH -sPAPERSIZE=a4 -dNOPAUSE -sDEVICE=pdfwrite -sOutputFile=out.pdf %str%
endlocal
смысл думаю понятен.

Кликните здесь для просмотра всего текста
0
6998 / 2896 / 555
Регистрация: 19.10.2012
Сообщений: 8,804
30.12.2013, 17:10
Вероятно тоже самое делает
Visual Basic
1
pdftk *.pdf cat output out.pdf
PAPERSIZE только подозреваю что не меняется.
pdftk.exe только качнуть и закинуть в папку с pdf'ками.
1
 Аватар для raxper
10237 / 6615 / 498
Регистрация: 28.12.2010
Сообщений: 21,154
Записей в блоге: 1
30.12.2013, 17:16
http://magicpc.spb.ru/journal/... urnal=last
0
Ушел с CyberForum совсем!
874 / 183 / 25
Регистрация: 04.05.2011
Сообщений: 1,020
Записей в блоге: 110
31.12.2013, 21:38  [ТС]
Спасибо, всем откликнувшимся (особенно Hugo121) благодаря всем вам тема раскрыта чуть более, чем полностью
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
31.12.2013, 21:38

Среда для склеивания файлов
Нужно написать среду для склеивания файлов exe + exe,pdf,doc,jpg,txt. Не используя ресурсы. А именно дописывать exe к jpg и так далее. ...

Как соединить несколько PDF файлов в один документ PDF?
имею распечатку книжки в 45 pdf файлах. как-то неудобно просматривать её. как их все объединить в один pdf файл? Может спец софт необходим?

Как разбить 1-ин pdf документ на множество pdf файлов в соответствии с регулярным выражением ?
Есть документ представляющий собой сборник статей тезисов (c рисунками) в двух формате pdf, задача получить из многостраничного документа...

Библиотека для создания pdf файлов
Здравствуйте. Я ищу библиотеку для создания pdf файлов. Наподобие Pdf Creator Pilot. Но она к сожалению платная. Подскажите возможные...

Разделение pdf-файла на несколько pdf-файлов
Здравствуйте, подскажите как разделить файл pdf - состоящий из n-страниц, на несколько файлов pdf через itextsharp.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
25
Ответ Создать тему
Новые блоги и статьи
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ"
Adler 06.10.2026
Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .
ИИ не может найти нужный язык в списке
Supersumestria 05.10.2026
Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO
zorxor 05.10.2026
Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru