Jak změnit velikost písma bubliny komentářů v dokumentu Word?
Jak je znázorněno na následujícím obrázku obrazovky, pokud chcete zvětšit velikost písma bubliny komentáře v dokumentu Word, co můžete udělat? Tento článek vám ukáže dvě metody řešení tohoto problému.
Změňte velikost písma bubliny komentářů pomocí vestavěné funkce v aplikaci Word
Změňte velikost písma bubliny komentáře pomocí kódu VBA
Změňte velikost písma bubliny komentářů pomocí vestavěné funkce v aplikaci Word
Velikost písma bublinového textu můžete přímo změnit v podokně Všechny styly v aplikaci Word. Postupujte prosím následovně.
1. zmáčkni Ctrl + Další + směna + S klávesy pro otevření Styly panel.
2. V Styly podokno, klepněte na tlačítko možnosti. Viz snímek obrazovky:
3. V otvoru Možnosti podokna stylů okno, vyberte Všechny styly z Vyberte styly, které chcete zobrazit rozbalovací seznam.
4. Pak klikněte na tlačítko OK k návratu na Styly podokně, přejděte prosím dolů a najděte Text bubliny řádek, klikněte na 
Klepnutím na tlačítko rozbalte rozevírací seznam a poté klepněte na tlačítko Upravit. Viz snímek obrazovky:
5. V Upravit styl v okně vyberte požadovanou velikost písma v Formátování sekce, jak je ukázáno níže, a poté klikněte na OK .
6. Zavři Styly panel.
Poté se velikost písma všech pozic komentářů změní na zadanou.
Poznámka: Toto nastavení bude v budoucnu platit pro všechny komentáře.
Změňte velikost písma bubliny komentáře pomocí kódu VBA
Tato část představí kód VBA, který vám pomůže snadno změnit velikost písma bubliny komentářů v dokumentu Word.
1. V dokumentu změníte velikost písma bubliny komentáře, stiskněte Další + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.
2. V okně klikněte na Vložit > Modul. Poté zkopírujte níže uvedený kód VBA do okna modulu.
Kód VBA: změna velikosti písma bubliny komentáře v aplikaci 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. zmáčkni F5 klíč ke spuštění kódu.
4. V první Kutools pro Word dialogové okno, zadejte nové písmo pro váš komentář a klikněte OK.
5. Ve druhé Kutools pro Word v dialogovém okně zadejte požadovanou velikost písma a klikněte na OK.
Poté se velikost písma všech pozic komentářů změní na zadanou v aktuálním dokumentu.
Nejlepší nástroje pro produktivitu v kanceláři
Kutools pro Word - Zvyšte své zkušenosti se slovem Over 100 Pozoruhodné vlastnosti!
🤖 Kutools AI asistent: Transformujte své psaní pomocí AI - Generovat obsah / Přepsat text / Shrnout dokumenty / Vyžádejte si informace na základě dokumentu, vše ve Wordu
📘 Mistrovství dokumentů: Rozdělit stránky / Sloučit dokumenty / Exportovat výběr v různých formátech (PDF/TXT/DOC/HTML...) / Dávkový převod do PDF / Exportujte stránky jako obrázky / Tisk více souborů najednou...
✏ Úprava obsahu: Dávkové hledání a nahrazení přes více souborů / Změnit velikost všech obrázků / Transponujte řádky a sloupce tabulky / Převést tabulku na text...
🧹 Čištění bez námahy: Smést pryč Extra prostory / Sekce přestávky / Všechny záhlaví / Textová pole / Odkazy / Další nástroje pro odstraňování naleznete u nás Odstranit skupinu...
➕ Kreativní vložky: Vložit Tisíc separátorů / Zaškrtávací políčka / Tlačítka rádia / QR kód / čárový kód / Tabulka diagonálních čar / Titulek rovnice / Titulek obrázku / Titulek tabulky / Více obrázků / Objevte více v Vložit skupinu...
???? Přesné výběry: Přesně konkrétní stránky / Tabulky / Tvary / nadpisové odstavce / Vylepšete navigaci pomocí vice Vyberte funkce...
⭐ Vylepšení hvězd: Navigujte rychle na libovolné místo / automatické vkládání opakujícího se textu / plynule přepínat mezi okny dokumentů / 11 Konverzní nástroje...
