如何更改Word文檔中註釋氣球的字體大小？
如下面的屏幕截圖所示，如果要放大Word文檔中註釋氣球的字體大小，該怎麼辦？ 本文將向您展示兩種解決此問題的方法。
在Word中使用內置功能更改註釋氣球的字體大小
您可以在Word的“所有樣式”窗格中直接更改氣球文本的字體大小。 請執行以下操作。
1。 按 按Ctrl + 其他 + 轉移 + S 鍵打開 樣式 窗格。
2。 在裡面 樣式 窗格中單擊 選項。 看截圖：
3.在開幕 樣式窗格選項 窗口，選擇 所有樣式 來自 選擇要顯示的樣式 下拉列表。
4。 然後點擊 OK 回到了 樣式 窗格，請向下滾動以找到 氣球文字 行，單擊 
按鈕以展開下拉列表，然後單擊 修改。 看截圖：
5。 在裡面 修改樣式 窗口中，根據需要選擇字體大小 格式化 部分，如下圖所示，然後單擊 OK 按鈕。
6。 關上 樣式 窗格。
然後，所有註釋氣球的字體大小更改為指定的字體。
備註：此設置以後將應用於所有評論。
使用VBA代碼更改註釋氣球的字體大小
本節將介紹VBA代碼，以幫助您輕鬆更改Word文檔中註釋氣球的字體大小。
1.在文檔中，您將更改註釋氣球的字體大小，然後按 其他 + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。
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 Sub3。 按 F5 鍵來運行代碼。
4.在第一 Kutools for Word 對話框中，輸入新字體作為註釋，然後單擊 OK.
5.在第二 Kutools for Word 對話框中，根據需要輸入字體大小，然後單擊 OK.
然後，所有註釋氣球的字體大小將更改為當前文檔中指定的字體。
最佳辦公生產力工具
Kutools for Word - 透過 Over 提升您的文字體驗 100 顯著特點！
🤖 Kutools 人工智慧助手：用人工智慧改變你的寫作 - 生成內容 / 重寫文字 / 總結文件 / 查詢資料 基於文檔，全部在Word中
📘 文件掌握: 分頁 / 合併文件 / 以各種格式匯出選擇（PDF/TXT/DOC/HTML...） / 批次轉換為PDF / 將頁面匯出為圖像 / 一次列印多個文件...
✏ 內容編輯: 批量查找和替換 跨多個文件 / 調整所有圖片的大小 / 轉置表行和列 / 將表格轉換為文字...
🧹 輕鬆清潔: 移開 多餘的空間 / 分節符 / 所有標題 / 文本框 / 超鏈接 / 如需更多拆卸工具，請前往我們的 刪除組...
➕ 創意插入： 插入 千位分隔符 / 複選框 / 單選按鈕 / QR Code / 條碼 / 對角線表 / 公式標題 / 圖片說明 / 表格標題 / 多張圖片 / 發現更多 插入組...
🔍 精準選擇：精確定位 特定頁面 / 表 / 形狀 / 標題段落 / 增強導航功能 更多 選擇功能...
⭐ 星級增強: 快速導航至任何位置 / 自動插入重複文字 / 在文檔視窗之間無縫切換 / 11 轉換工具...
