Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Добрый день,
возникла задача сменить все заголовки в word 2003,
header 1
header 2
>
на header 3
в сотне файлов самого разного вида и форматирования.
На данный момент приходится старым методом - открывая порционно и меняя все практически вручную.
Можно ли это автоматизировать?
1 записать с помощью макрорекордера сам процесс замены
2 подключить библиотеку
Microsoft Scripting Runtime (C:\Windows\System32\ScrRun.dll) — для того , чтобы можно было пользоваться объектом FileSystemObject и прочими для работы с файловой системой . Эта библиотека, которая есть на любом компьютере начиная с Windows 2000, — самый удобный способ выполнения большинства действий в файловой системе
3 скопировать! - для экспериментов только копировать! все необх файлы скажем в "C:\Files"
4 создать процедуру типа:
Dim oFSO As New Scripting.FileSystemObject
Dim oFolder As Scripting.Folder
Dim oFile As Scripting.File
Set oFolder = oFSO.GetFolder("C:\Files")
For Each oFile In oFolder.Files
oFile.Open
…
oFile.Close
Next5 вместо многоточия вставить текст вашей процедуры замены одного заголовка на другой.
Честно говоря ничего не понял, буду признателен за решение для широких масс населения.
файл(ы) в студию. - что было и что нужно получить - как грится до и после.
За образец можно взять макрос из заметки Массовое форматирование документов.
Нужно лишь прописать переменные для заголовков и заменить блок форматирования на нужные действия.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Сменить все header 1 на header 3 в сотне файлов
Чем мощнее и грандиознее та или иная программа, тем сложнее с ней разобраться. Взять Microsoft Word. На первый взгляд все просто, на второй тоже, на третий, вообще думать не надо, а на четвертый оказывается, что в редакторе уйма скрытых возможностей, о которых мы и не подозревали. На портале о Microsoft Office Word вы узнаете про: word шрифт по умолчанию изменить.
Вы убиваете целый вечер на работу, а коллега сделал ее за час-другой? Как ему это удалось? А легко: он оптимизировал и настроил свой Word. На портале о Microsoft Office Word вы узнаете про: jabc 7 rfr yt yevbhjdfnm 1. cnhfybwe. На сайте и форуме Ворд Эксперт очень много решений, как это сделать. Можно написать макрос для каждой операции, выбрать оптимальную настройку приложения или создать шаблон. Наш сайт о Microsoft Office Word даст ответ про: как заштриховать в верде ячейку в таблице.
Обсудить достоинства и недостатки их, различные методы работы с текстом, преимущества и изъяны версий вы можете на форуме. На портале о Microsoft Office Word вы узнаете про: как убрать номера страниц сверху. Если вы никогда раньше не писали макросы, то не беда, все предельно ясно и доступно, а для пытливого ума ссылка на дополнительную литературу. Наш сайт о Microsoft Office Word даст ответ про: режим показа невидимых символов в word.
Конечно, можно взять чье-то готовое решение, такие тоже выкладывают на Ворд Эксперт в специальном подразделе, а можно просто озвучить проблему и попросить помощи у умельцев в разделе заявок. На портале о Microsoft Office Word вы узнаете про: разрыв раздела со следующей страницы убрать все.
В общем, у вас есть возможность, посетив форум, сделать свой Ворд еще более легким, приятным и быстрым. Наш сайт о Microsoft Office Word даст ответ про: office 2003 как удалить историю. Не упускайте ее!