Как изменить размер шрифта всплывающего окна комментария в документе 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 инструментов преобразования...