Vba word изменить шрифт документа

Обновлено: 07.07.2024

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

Изменить шрифт и размер шрифта в текстовых полях в текущем документе

Для текстовых полей вы измените шрифт и размер шрифта в текущем документе. Для решения проблемы примените приведенный ниже код VBA.

1. нажмите другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.

2. в Microsoft Visual Basic для приложений окна, нажмите Вставить > Модуль, а затем скопируйте следующий код в окно модуля.

Код VBA: изменить шрифт и размер шрифта во всех текстовых полях в текущем документе

Внимание: В коде "Arial(Основной ключ) и 20»- это указанный шрифт и размер шрифта в моем случае. Вы можете изменить их по своему усмотрению.

3. нажмите F5 ключ для запуска кода. Затем шрифт всех текстов и размер шрифта в текстовых полях изменяются на указанный шрифт и размер шрифта. Смотрите скриншот:


Измените шрифт и размер шрифта во всех текстовых полях всех документов в папке

Для массового изменения шрифта текстовых полей и размера шрифта в нескольких документах Word необходимо применить приведенный ниже код VBA.

1. Соберите все целевые документы, содержащие текстовые поля, вы измените шрифт и размер шрифта в той же папке.

2. В открывающемся документе Word нажмите кнопку другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.

3. в Microsoft Visual Basic для приложений окна, нажмите Вставить > Модуль, а затем скопируйте следующий код в окно модуля.

Код VBA: изменение шрифта и размера шрифта в текстовых полях нескольких документов

4. нажмите F5 ключ для запуска кода. В открытии Приложения в окне выберите папку (содержащую документы, которые вы измените шрифт и размер шрифта в текстовых полях) и нажмите кнопку OK кнопку.


Затем шрифт всех текстовых полей и размер шрифта документов в выбранной папке изменяются на указанный шрифт и размер шрифта.

В этой статье рассмотрены свойства шрифта (объекта Font), определяющие внешнее оформление (начертание) видимого значения ячейки. Это касается не только текста (строк), но и визуального начертания отображаемых дат и числовых значений.

Формат отображаемого значения

Когда мы из кода VBA Excel записываем в ячейку текстовое или другое значение, оно отображается в формате, присвоенном данной ячейке. Это может быть формат:

  • рабочего листа по умолчанию;
  • установленный для диапазона пользователем;
  • примененный к диапазону из кода VBA Excel.

Если ячейка содержит текстовое значение, его начертание можно форматировать по отдельным частям (подстрокам). Такое форматирование доступно как в ручном режиме на рабочем листе, так и из кода VBA Excel.

У объекта Range есть свойство Font (шрифт), которое отвечает за форматирование (начертание) визуально отображаемого текста в ячейках рабочего листа. Его применение вызывает объект Font, который в свою очередь обладает собственным набором свойств, отвечающих за конкретный стиль начертания отображаемого значения.

Основные свойства объекта Font

Свойство Описание Значения
Name наименование шрифта «Arial», «Calibri», «Courier New», «Times New Roman» и т.д.
Size размер шрифта от 1 до 409 пунктов
Bold полужирное начертание True, False
Italic курсивное начертание True, False
FontStyle заменяет Bold и Italic «обычный», «полужирный», «курсив», «полужирный курсив»
Superscript надстрочный текст True, False
Subscript подстрочный текст True, False
Underline подчеркнутый текст True, False
Color* цвет текста от 0 до 16777215

*Color — это не единственное свойство, отвечающее за цвет отображаемого текста в ячейке. Оно также может принимать и другие значения, кроме указанных в таблице. Смотрите подробности в статьях Цвет текста (шрифта) в ячейке и Цвет ячейки (заливка, фон).

Примеры форматирования текста

Пример 1
В этом примере ячейкам диапазона «A1:A3» присвоим шрифты разных наименований:

Класс Font

В прошлых статьях мы научились создавать приложение Word (смотрите "Word.Application"), новый документ (смотрите "Word.Documents") и также рассмотрели процесс добавления заданного текста в созданный документ с помощью объекта Selection (смотрите "Word.Selection"). Теперь настало время познакомиться с объектом Font, доступ к которому можно получить через одноименное свойство. Фактически, объект Font позволяет задать параметры форматирования шрифта.

Объект Font - основные параметры шрифта в Word

Сам по себе класс Font довольно прост, так как все свойства и методы интуитивно понятны. Сами свойства я разбил на несколько категорий в зависимости от их типа. И так, приступим…

Свойства класса Font – параметры форматирования шрифта

параметры шрифта в Word

Свойства, которые доступны для чтения и для записи, принимают логические значения TRUE или FALSE. При установлении значения TRUE свойства позволяют отформатировать выделенный текст: сделать жирным, курсивом, подчеркнутым и так далее.

AllCaps – Все прописные.

SmallCaps – Малые прописные.

Bold – Жирный шрифт в Word, само свойство возвращает True, False или wdUndefined (смесь True или False)

DoubleStrikeThrough – Двойное зачеркивание.

StrikeThrough – Одинарное зачеркивание.

Emboss – Приподнятый.

Engrave – Утопленный.

Italic – Курсив.

Outline – Контур.

Shadow – С тенью.

Subscript – Подстрочный знак.

Superscript – Надстрочный знак.

основные параметры Word шрифта

Свойства, которые позволяют задать или получить значение, заданное определенной константой (если происходит выполнение кода в редакторе VBA то можно использовать не целое число, и именованное значение).

ColorIndex – Параметры цвета текста шрифта в Word, значения константы WdColorIndex:

  • wdAuto - 0 - Автоматический цвет. По умолчанию, обычно черный цвет.
  • wdByAuthor - -1 - Цвет определяется автором документа
  • wdNoHighlight - 0 - Удаляет подсветку.
  • wdBlack - 1 – черный.
  • wdBlue - 2 – синий.
  • wdTurquoise - 3 – бирюзовый.
  • wdBrightGreen - 4 - ярко-зеленый.
  • wdPink - 5 – розовый.
  • wdRed - 6 – красный.
  • wdYellow - 7 – желтый.
  • wdWhite - 8 – белый.
  • wdDarkBlue - 9 - темно-синий.
  • wdTeal - 10 – бирюзовый.
  • wdGreen - 11 – зеленый.
  • wdViolet - 12 – фиолетовый.
  • wdDarkRed - 13 - темно-красный.
  • wdDarkYellow - 14 - темно-желтый.
  • wdGray50 - 15 - тень 50 серого.
  • wdGray25 - 16 - тень 25 серого.

Underline - Тип подчеркивания, заданный значением константы WdUnderline:

  • wdUnderlineNone - 0 - нет подчеркивания.
  • wdUnderlineSingle - 1 - одна линия, по умолчанию.
  • wdUnderlineWords - 2 - подчеркнет только отдельные слова.
  • wdUnderlineDouble - 3 - двойная линия.
  • wdUnderlineDotted - 4 – точки.
  • wdUnderlineThick - 6 - единая жирная линия.
  • wdUnderlineDash - 7 – тире.
  • wdUnderlineDotDash - 9 - чередующиеся точки и тире.
  • wdUnderlineDotDotDash - 10 – чередующиеся две точки и тире.
  • wdUnderlineWavy - 11 - одна волнистая линия.
  • wdUnderlineDottedHeavy - 20 – жирные точки.
  • wdUnderlineDashHeavy - 23 - жирные тире.
  • wdUnderlineDotDashHeavy - 25 - чередующиеся жирные точки и жирные тире.
  • wdUnderlineDotDotDashHeavy - 26 - чередующиеся жирные две точки и тире.
  • wdUnderlineWavyHeavy - 27 - жирная волнистая линия.
  • wdUnderlineDashLong - 39 - длинное тире.
  • wdUnderlineWavyDouble - 43 - двойная волнистая линия.
  • wdUnderlineDashLongHeavy - 55 - длинное жирное тире.

UnderlineColor - Возвращает или устанавливает 24-битный цвет подчеркивания, содержит значение константы WdColor:

  • wdColorAqua - 13421619 - аква
  • wdColorAutomatic - 16777216 - Автоматическая цвет. По умолчанию, обычно черный цвет.
  • wdColorBlack - 0 – черный.
  • wdColorBlue - 16711680 – синий.
  • wdColorBlueGray - 10053222 - сине-серый.

DiacriticColor - Как ColorIndex, позволяет задать параметры цвета текста шрифта в word, принимает значения константы WdColor.

Прочие свойства, которые позволяют получить или задать такие основные параметры шрифта в Word, как размер, имя и так далее.

Position – Позволяет получить или задать смещение текста в пунктах относительно базовой линии.

Scaling - Возвращает или устанавливает процент масштаба, применяемого к шрифтом.

Spacing - Возвращает или задает расстояние в пунктах между символами. Считывание / запись

Size – Позволяет получить или установить параметры форматирования шрифта в Word: размер в пунктах.

Name - Возвращает или задает имя.

настройка параметров шрифтов в word

Методы объекта Font – параметры форматирования шрифта в Word

Grow () - Увеличивает размер на один пункт.

Shrink () - Уменьшает размер на один пункт.

Reset () – Полностью очищает параметры форматирования текст шрифта в Word.

Хорошо, основные свойства и методы мы рассмотрели, теперь настало время приступить к программированию, я напишу два примера под Wndows Script Host. Логика проста: происходит создание нового документа Word, далее происходит вставка текста с помощью объекта Selection, после происходит выделение различных диапазонов текста и их форматирование – основные параметры шрифта в Word.

Пример на VBScript

Пример на JScript

настройка параметров форматирования Word шрифта

Хорошо, теперь давайте разберем данные примеры. Логика работы программного кода одинакова, сразу после создания документа происходит несколько этапов:

Этап первый – в цикле for (смотрите синтаксис для языка vbscript - "Урок 6 по VBScript: Циклы for…next и for each…next" и jscript - "Урок 9 по JScript - оператор цикла for") происходит вставка текста, с учетом параграфа и перевода строки.

Этап второй – Тут в блоке with содержится длинная череда из выделения фрагментов, для которых задаются основные параметры шрифта в Word: размер, отступы, имя и так далее.

Этап третий – Снова следует блок with, в теле которого выборочно происходит смена цвета для выделенных фрагментов. Далее с задержкой в 3 секунды (смотрите статью "Объект WScript - методы sleep, quit и echo и 8 свойств") сбрасываются параметры форматирования шрифта и меняется регистр символов.

Спасибо за внимание. Автор блога Владимир Баталий

Как показано на скриншоте ниже, что вы можете сделать, если хотите увеличить размер шрифта выноски комментария в документе Word? Эта статья покажет вам два метода решения этой проблемы.


Измените размер шрифта выноски комментария с помощью встроенной функции в Word

Вы можете напрямую изменить размер шрифта всплывающего текста на панели «Все стили» в Word. Пожалуйста, сделайте следующее.

1. нажмите Ctrl + другой + Shift + S , чтобы открыть Стили панель.

2. в Стили панели, нажмите Параметры. Смотрите скриншот:


3. В дебюте Параметры панели стилей окно, выберите Все стили из Выберите стили для показа выпадающий список.



4. Затем нажмите OK вернуться к Стили панель, прокрутите вниз, чтобы найти Воздушный шар линию, щелкните кнопку, чтобы развернуть раскрывающийся список, а затем щелкните Изменить. Смотрите скриншот:


5. в Изменить стиль в окне выберите нужный размер шрифта в форматирование раздел, как показано на скриншоте ниже, а затем щелкните OK кнопку.


6. Закрой Стили панель.

Затем размер шрифта всех всплывающих окон комментариев изменяется на указанный.


Внимание: Настройка будет применяться ко всем комментариям в будущем.

Измените размер шрифта выноски комментария с помощью кода VBA

В этом разделе представлен код VBA, который поможет вам легко изменить размер шрифта всплывающего окна комментариев в документе Word.

1. В документе вы измените размер шрифта выноски комментария, нажмите кнопку другой + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.

2. В окне нажмите Вставить > Модуль. Затем скопируйте ниже код VBA в окно модуля.

Код VBA: изменить размер шрифта всплывающего окна комментария в Word

3. нажмите F5 ключ для запуска кода.

4. В первом Kutools for Word диалоговом окне введите новый шрифт для вашего комментария и нажмите OK.


5. В секунду Kutools for Word в диалоговом окне введите нужный размер шрифта и щелкните OK.


Затем размер шрифта всех всплывающих окон комментариев изменяется на указанный в текущем документе.

Читайте также: