Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » Любой язык - распечатать несколько сотен документов word

Ответить
Настройки темы
Любой язык - распечатать несколько сотен документов word

Ветеран


Сообщения: 547
Благодарности: 36

Профиль | Сайт | Отправить PM | Цитировать


В папке есть несколько сотен меленьких вордовских документов,
как красиво их распечатать все разом?)

Выделить все, а потом правой кнопкой мыши - Print -не предлагать, ибо вызывает на каждый файл экземпляр целого ворда и никакой памяти не хватит. Работает при нескольких файлах, но несколько сотен не вытянет.
VBA в самом ворде писать не хочу, мне кажется более красивый способ - внешний скрипт.

-------
консольный клиент telegram для Windows: www.elapser.info


Отправлено: 17:39, 17-09-2015

 

Ветеран


Contributor


Сообщения: 2728
Благодарности: 1697

Профиль | Отправить PM | Цитировать


Попробуйте (не очень отлаживал - не на чем). Не уверен в совместимости для всех версий Word. Все файлы в папке, например,
E:\Файлы для печати
будут печататься поочерёдно на принтер по умолчанию
Код: Выделить весь код
@Echo Off
Set "Doc=E:\Файлы для печати" 

FOR /F "usebackq delims=" %%w IN (`Dir "%ProgramFiles% (x86)\Microsoft Office\WinWord.exe" /b /s /A:-D 2^>nul`) DO Set "Word=%%w"
FOR /F "usebackq delims=" %%w IN (`Dir "%ProgramFiles%\Microsoft Office\WinWord.exe" /b /s /A:-D 2^>nul`) DO Set "Word=%%w"

FOR /F "usebackq delims=" %%d IN (`Dir "%Doc%\*.do*" /b /A:-D 2^>nul`) DO (
	"%Word%" "%Doc%\%%d" /q /n /mFilePrintDefault /mFileSave /mFileExit
)
Использовал Печать-ms-word-документа-из-командной-строки и Использование параметров командной строки для запуска Word 2010, Word 2007, Word 2003, Word 2002 и Word 2000

-------
Даже самая сложная проблема обязательно имеет простое, лёгкое для понимания, неправильное решение. Каждое решение плодит новые проблемы.


Последний раз редактировалось megaloman, 17-09-2015 в 22:58.


Отправлено: 22:47, 17-09-2015 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Ветеран


Сообщения: 27449
Благодарности: 8087

Профиль | Отправить PM | Цитировать


Цитата Опиум:
Выделить все, а потом правой кнопкой мыши - Print -не предлагать, ибо вызывает на каждый файл экземпляр целого ворда и никакой памяти не хватит. Работает при нескольких файлах, но несколько сотен не вытянет. »
Просто откройте перед печатью один экземпляр «winword.exe».

Отправлено: 08:21, 18-09-2015 | #3



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » Любой язык - распечатать несколько сотен документов word

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
CMD/BAT - [решено] пакетная конвертация документов Word в HTML romby Скриптовые языки администрирования Windows 15 25-03-2023 19:02
Просмотрщики документов Word и Excel от компании Microsoft _syd_ Автоматическая установка приложений 1 27-11-2017 05:45
2007 - Проблема с запуском файлов документов Word 2007 chymichov Microsoft Office (Word, Excel, Outlook и т.д.) 1 29-11-2013 19:14
2007 - Слияние документов Word Excel NeoVit Microsoft Office (Word, Excel, Outlook и т.д.) 4 12-02-2012 17:02
2010 - Работа с окнами и изменение масштаба документов в Word 2010 OSZone Microsoft Office (Word, Excel, Outlook и т.д.) 0 18-03-2010 01:30




 
Переход