Перейти к основному содержанию

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

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

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

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


Измените размер шрифта выноски комментария с помощью встроенной функции в 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

Sub SetCommentTextStyle()
'Updated by ExtendOffice 20181112
    Dim objComment As Comment
    Dim objDoc As Document
    Dim strFontName As String
    Dim strFontSize As String 
    Set objDoc = ActiveDocument
    strFontName = InputBox("Enter text font name here: ", "Font name")
    strFontSize = InputBox("Enter font size here: ", "Font size") 
    With objDoc
      For Each objComment In .Comments
        objComment.Range.Font.Name = strFontName
        objComment.Range.Style = ActiveDocument.Styles("Balloon Text Char")
      Next objComment
    End With
    ActiveDocument.Styles("Balloon Text").Font.Size = Val(strFontSize)
End Sub

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

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

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

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

Лучшие инструменты для офисной работы

Kutools for Word - Повысьте свой опыт работы со словом с помощью Over 100 Замечательные особенности!

🤖 Kutools AI Помощник: Преобразуйте свое письмо с помощью искусственного интеллекта. Создать контент  /  Переписать текст  /  Обобщение документов  /  Запросить информацию на основе документа, все в Word

📘 Владение документами: Разделить страницы  /  Объединить документы  /  Экспортировать выбранное в различные форматы (PDF/TXT/DOC/HTML...)  /  Пакетное преобразование в PDF  /  Экспортировать страницы как изображения  /  Печать нескольких файлов одновременно...

Редактирование содержания: Пакетный поиск и замена через несколько файлов  /  Изменить размер всех изображений  /  Транспонировать строки и столбцы таблицы  /  Преобразовать таблицу в текст...

🧹 Легкая очистка: Убрать Дополнительные места  /  Разрывы разделов  /  Все заголовки  /  Текстовые поля  /  Гиперссылки  / Чтобы получить дополнительные инструменты для удаления, посетите наш Удалить группу...

Креативные вставки: Вставлять Разделители тысяч  /  Флажки  /  радио кнопки  /  QR код  /  Штрих-код  /  Таблица диагональных линий  /  Заголовок уравнения  /  Заголовок изображения  /  Заголовок таблицы  /  Несколько изображений  / Узнайте больше в Вставить группу...

???? Точный выбор: Точно определить конкретные страницы  /  Эта таблица  /  формы  /  заголовки абзацев  / Улучшите навигацию с помощью БОЛЕЕ Выберите функции...

Звездные улучшения: Быстро перемещайтесь в любое место  /  автоматическая вставка повторяющегося текста  /  плавно переключаться между окнами документов  /  11 инструментов преобразования...

👉 Хотите попробовать эти функции? Kutools for Word предлагает 60-дневная бесплатная пробная версия, без ограничений! 🚀
 
Comments (4)
Rated 4.75 out of 5 · 2 ratings
This comment was minimized by the moderator on the site
Neither "comment text" nor "baloon text" present in Styles...
This comment was minimized by the moderator on the site
Does not work on current version of Word for Office 365 for Windows. Even though I specify Balloon text, it only applies the change to the body text of the Word doc. I've tried this several times and get the same result, even when I choose "Comment text" instead of Ba,lon text.
This comment was minimized by the moderator on the site
Perfect explanation and solution! Thanks a lot!
I was looking for this solution for hours...😍
Rated 5 out of 5
This comment was minimized by the moderator on the site
Thank you. I would never have found this, buried deep in MS menu structure.
Rated 4.5 out of 5
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations