Сегодня возникла эпическая задача заменить в нашем документе стиль с общедоступного (Tahoma/ Arial/ Times New Roman) на присланный Заказчиком некий ГОСТ-оподобный шрифт. Начальник стал делать это по красоте: используя традиционный инструментарий MS Word для работы со стилями. Потратил на это 1,5 часа. Я решил опробовать метод «грубого вмешательства», наверно это не лучшее решение! Но думаю в ситуации когда у вас нет времени сделать «все красиво и стильно» и/или вы не знаете как это сделать средствами MS Word этот метод имеет право на жизнь… Перед вмешательством обязательно сохраните резервную копию документа, на случай если что то пойдёт «не так».
Пошаговая инструкция
- В проводнике Windows мышью выделяем интересующий нас документ.
- Щелкаем правой кнопкой мыши и в выпавшем конектсном меню выбираем архиватор 7-Zip, и в нем пункт меню Открыть архив.
![]()
- В окне архиватора в проводнике архива открывем папку word.
- В этой папке находим файл styles.xml.
- Выбрав файл, щелкаем правой кнопкой мыши и в контекстном меню выбираем верхний пункт Открыть.
- Документ откроется в приложении Блокнот (Notepad.exe), нужно вызвать окно замены текста выбрав соответствующую команду в контекстном меню или нажав клавиши Ctrl+H.
- В верхней строке пишем какой шрифт требуется заменить, в нижней на какой и нажимаем Заменить все.
- Закрываем документ, нажав при этом кнопку Сохранить.
- В появившемся окне архиватора, появляется предложение обновить файл styles.xml, нажимаем кнопку OK.
- PROFIT!
На всё про все потратил 10 минут…
Оценка результатов манипуляций
После открытия отредактированного документа MS Word выяснилось, что целом все прошло все нормально. Единственное проблемное место — встречаются такие артефакты в подписях под рисунками и над таблицами. Обратите внимание, что шрифт до длинной черты-разделителя отличается от шрифта после нее.
Несмотря на то что с обоих сторон текст, показывается набранным одинаковым стилем (**Заг_рис) и шрифтом (GOST type B).
После вырезания разделителя и последующей вставки шрифт всей строки становится одинаковым! В принципе выход, но по тексту документа такие артефакты встречаются много раз.
Позднее я обнаружил, что проблема лечится заменой символа на самого же себя.
- Нажимаем команду Заменить или комбинацию клавиш Ctrl+H.
- В поле Найти вставляем символ "—".
- В поле Заменить на Вставляем символ "—".
- В завершение жмем кнопку Найти далее.
После этого шрифт в надписи слева и справа стал выглядеть одинаково.
Как заменить весь шрифт в ворде
Изменить шрифт и размер шрифта в текстовых полях в текущем документе
Для текстовых полей вы измените шрифт и размер шрифта в текущем документе. Для решения проблемы примените приведенный ниже код VBA.
1. нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. в Microsoft Visual Basic для приложений окна, нажмите Вставить > Модули, а затем скопируйте следующий код в окно модуля.
Код VBA: изменить шрифт и размер шрифта во всех текстовых полях в текущем документе
re>Sub FormatTextsInTextBoxes() 'Updated by ExtendOffice 20181128 Dim I As Long Dim xShape As Shape Dim xDoc As Document Set xDoc = ActiveDocument On Error Resume Next For Each xShape In xDoc.Shapes xShape.Select If xShape.GroupItems Is Nothing Then With xShape.TextFrame.TextRange.Font .Name = "Arial" .Size = 20 End With GoTo LblExit End If For I = 1 To xShape.GroupItems.Count With xShape.GroupItems(I).TextFrame.TextRange.Font .Name = "Arial" .Size = 20 End With Next LblExit: Next End Sub
Внимание: В коде "Arial(Основной ключ) и 20»- это указанный шрифт и размер шрифта в моем случае. Вы можете изменить их по своему усмотрению.
3. нажмите F5 ключ для запуска кода. Затем шрифт всех текстов и размер шрифта в текстовых полях изменяются на указанный шрифт и размер шрифта. Смотрите скриншот:
Измените шрифт и размер шрифта во всех текстовых полях всех документов в папке
Для массового изменения шрифта текстовых полей и размера шрифта в нескольких документах Word необходимо применить приведенный ниже код VBA.
1. Соберите все целевые документы, содержащие текстовые поля, вы измените шрифт и размер шрифта в той же папке.
2. В открывающемся документе Word нажмите кнопку другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
3. в Microsoft Visual Basic для приложений окна, нажмите Вставить > Модули, а затем скопируйте следующий код в окно модуля.
Код VBA: изменение шрифта и размера шрифта в текстовых полях нескольких документов
4. нажмите F5 ключ для запуска кода. В открытии Вставить в окне выберите папку (содержащую документы, которые вы измените шрифт и размер шрифта в текстовых полях) и нажмите кнопку OK .
Затем шрифт всех текстовых полей и размер шрифта документов в выбранной папке изменяются на указанный шрифт и размер шрифта.
Лучшие инструменты для офисной работы
Kutools for Word — Повысьте свой опыт работы со словом с помощью Over 100 Замечательные особенности!
Легкая очистка: Убрать Дополнительные места / Разрывы разделов / Текстовые поля / Гиперссылки / Дополнительные инструменты для снятия см. Удалить группа.
➕ Креативные вставки: Вставлять Разделители тысяч / Флажки / радио кнопки / QR код / Штрих-код / Несколько изображений / Узнайте больше в Вставить группа.
Хотите попробовать эти функции? Загрузите Kutools for Word прямо сейчас!
Бесплатная загрузка Купить Узнайте больше о Kutools для Word
