Комментарии 24
Перегонять скриптом в пдф это, конечно, хорошо. Но зачем в цикле открывать приложение, если можно его открыть один раз и только открывать/закрывать документ?
Плохо знаком с VBA. Если поможете с таким скриптом то с удовольствием добавлю. Для многих такой подход куда проще будет
Sub main()
where = ThisDocument.Path + "\"
'where = "e:\Download\разобрать же 8\разобрать же 7\разобрать же 6\Аниме\Разобрать (4)\"
what = Dir(where + "*.doc*")
Do While what <> ""
If Not (what = ThisDocument.Name And where = ThisDocument.Path) Then
Documents.Open (where + what)
Documents(what).ExportAsFixedFormat where + what + ".pdf", wdExportFormatPDF, False
Documents(what).Close False
End If
what = Dir()
Loop
End Sub
А нельзя ли поставить pdf принтер по умолчанию и распечатать нужные файлы?
Тогда даже VBA не потребуется )
Все это конечно здорово. На самом деле без сарказма. Пакет офисных программ MS Office довольно мощный в умелых руках. Но скоро нас всех пересадят на какой нибудь "Мой офис" и будем мы как с чистого листа.
Пакет офисных программ MS Office довольно мощный в умелых руках.
С ним бывают приколы на ровном месте, от которых прям болит в одном месте. Особенно, если нужно сдавать документы еще вчера, что бывает очень часто.
Писали мы как-то ПЗ на изделие, состоящее из 750 страниц. По ГОСТу, с рамочками, все как положено. Рамочки были засунуты в колонтитулы (не знаю, насколько это правильно с точки зрения вордоводства, но работало прям зачётно), автоматом появлялись на новых листах, все шикарно. И вот прибегают ко мне товарищи, на тот момент оформляющие часть документации, с криками «ВСЁ ПРОПАЛО!». А причина была банально — до 500какой-то страница ворд нормально ставил везде рамки в колонтитулах, а на следующей (разделы и прочее не менялось, просто текст) внезапно перестал, оставив только полторы линии слева и чуть сверху. Болячку пытались побороть всей толпой, но так и не смогли.
Как сдавали это мракобесие потом я уже не помню, к сожалению.
В либре при установке перекресной ссылки просто выбираешь "только номер". И все. И так было всегда, сколько я помню. Неужели в ms word все еще нужны какие-то танцы с бубном?
Ну и если в настройках указать "автоназвание" для рисунков, то слово "Рисунок" и номер появляются автоматом при вставке рисунка. Остается дописать только название. Что, в ms word и такой простой вещи нет?
Поражает, как MS нашпиговывает свои продукты функиями, нужнымы едва ли 0.1% пользователей, лепит красивые интерфейсы, но нумерация у них все еще из прошлого века.
Угу, либра зато начинает вытворять чудеса с полусотни страниц в документе, а ворд и с пятью сотнями как-то справляется. А ещё в либре какой-то недоязык формул, и что мешало реализовать поддержку нормального латеха — поди пойми. Всё бы ничего, пока формулы простые и их мало, но бывают ведь сложные и много.
Перешел для доков на LaTeX, там оно все само просто работает без плясок с бубном и каких-то лишних телодвижений =)
Бывает что заказчики и нормоконтроль требуют документ в редактируемом формате doc
Ой, нормоконтроль... Вспомнилось, как я с ними работал. Пусть и немного не в тему основной статьи :)
Были у нас изделия, по сути одинаковые, ибо серийное производство. И на каждое нужен паспорт. Были шаблоны паспортов, согласованные со всеми, кем только можно, утвержденные и так далее. Чтобы было понятнее — это такой доковский документ страниц на 10-15 с шаблонными фразами, где нужно поменять только номер изделия и еще пару тройку слов.
Каждый раз, когда я отправлял на нормоконтроль очередной паспорт, практически всегда мне его возвращали с нормоконтроля почирканный красной ручкой почти везде. Особенно радовало, когда ты только все исправил (там мелочи вроде переносов строк и так далее, но тем не менее), утвердил и сдал, делаешь на следующее изделие следующий паспорт из этого, поменяв только одну цифру, и получаешь снова почирканный везде красной ручкой обратно.
Помню, я тогда мечтал написать им генератор паспортов, чтобы все нужные циферки можно было вставить в поля в софтине, а на выходе получать ОДИНАКОВЫЕ доки, сгенеренные в латехе. Но так и не написал, уволился раньше, чем руки дошли.
Есть одна существенная и пока не решенная проблема при ссылках на страницы и рисунки. Это склонение ссылок.
Если https://habr.com/ru/post/651801/#4 (Изменение формата перекрестной ссылки на рисунок (таблицу, раздел, пункт)) не об этом, то опишите пожалуйста проблему подробнее. Самому интересно.
Как вариант, я вместо "Рисунок №" писал "Рис.№", и проблема исчезает
Вставляете перекрёстную ссылку вида "Постоянная часть и номер" (вставится "Рисунок 4"), затем постоянную часть (слово "Рисунок") выделяете и нажимаете ctrl+shift+H. Остаётся только "4".
Итог: фраза "... на рисунке Рисунок 4 изображено..." превратится в "...на рисунке 4 изображено..."
А все скрытые куски полей можно всегда посмотреть и поправить через отображение непечатаемых символов (ну или по хоткею ctrl+shift+8 для вордоводов со звёздочкой).
Отличная статья, которая еще долго не потеряет своей актуальности
Повышаем эффективность работы с Word