Přejít k hlavnímu obsahu

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 Sub

3. zmáčkni F5 klíč ke spuštění kódu.

4. V první Kutools for Word dialogové okno, zadejte nové písmo pro váš komentář a klikněte OK.

5. Ve druhé Kutools for 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 for Word - Zvyšte své zkušenosti se slovem Over 100 Pozoruhodné vlastnosti!

Ponořte se do zvýrazněných funkcí níže nebo klikněte sem a prozkoumejte plnou sílu Kutools for Word.

📘 Mistrovství dokumentů: Rozdělit stránky  /  Sloučit dokumenty  /  Exportovat výběr v různých formátech (PDF/TXT/DOC/XLSX)  /  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ámahySmést pryč Extra prostory  /  Sekce přestávky  /   Všechny záhlaví  /  Textová pole  /  Odkazy  /  Další nástroje pro odstraňování najdete v naší skupině pro odstranění

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 naší skupině Insert

???? Přesné výběry: Označte konkrétní stránky  /  Tabulky  /  Tvary  /  nadpisové odstavce  /  Procházejte se snadno pomocí naší Select Group

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 ...

Transformujte své úkoly ve Wordu pomocí Kutools. 👉 Stáhněte si nyní 30denní zkušební verzi 🚀.

Více       Stažení zdarma      Nákup
 
Comments (3)
Rated 4.75 out of 5 · 2 ratings
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