Hoppa till huvudinnehåll

Hur ändrar jag teckenstorleken på kommentarballongen i Word-dokument?

Som nedan visas skärmdump, om du vill förstora teckenstorleken på kommentarballongen i Word-dokument, vad kan du göra? Den här artikeln visar två metoder för att lösa detta problem.

Ändra teckenstorleken på kommentarballongen med inbyggnadsfunktionen i Word

Ändra teckenstorleken på kommentarballongen med VBA-kod


Ändra teckenstorleken på kommentarballongen med inbyggnadsfunktionen i Word

Du kan direkt ändra teckenstorleken på ballongtexten i rutan Alla stilar i Word. Gör så här.

1. tryck på ctrl + andra + shift + S nycklar för att öppna Stilar rutan.

2. I Stilar fönster, klicka Tillbehör. Se skärmdump:

3. I öppningen Alternativ för stilruta fönster, välj Alla stilar från Välj stilar att visa listrutan.

4. Klicka sedan OK att återvända till Stilar ruta, bläddra ner för att hitta Ballongtext raden, klicka på för att expandera rullgardinsmenyn och klicka sedan på Ändra. Se skärmdump:

5. I Ändra stil välj en teckenstorlek som du behöver i formatering avsnittet som visas nedan och klicka sedan på OK knapp.

6. Stäng Stilar rutan.

Sedan ändras teckensnittsstorleken för alla kommentarballonger till den angivna.

Anmärkningar: Inställningen kommer att gälla för alla kommentarer i framtiden.


Ändra teckenstorleken på kommentarballongen med VBA-kod

Detta avsnitt kommer att införa en VBA-kod som hjälper dig att enkelt ändra teckenstorleken på kommentarballongen i Word-dokument.

1. I dokumentet kommer du att ändra teckenstorleken på kommentarballongen, tryck på andra + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. Klicka på i fönstret Insert > Modulerna. Kopiera sedan VBA-koden nedan till modulfönstret.

VBA-kod: ändra teckenstorleken på kommentarballongen i 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. tryck på F5 för att köra koden.

4. I den första Kutools för Word dialogrutan, ange ett nytt teckensnitt för din kommentar och klicka OK.

5. På sekunden Kutools för Word dialogrutan, skriv in teckenstorleken efter behov och klicka OK.

Sedan ändras teckensnittsstorleken för alla kommentarballonger till den angivna i det aktuella dokumentet.

Bästa kontorsproduktivitetsverktyg

Kutools för Word - Höj din ordupplevelse med Over 100 Anmärkningsvärda funktioner!

Dyk in i de markerade funktionerna nedan eller klicka här för att utforska den fulla kraften i Kutools för Word.

📘 Dokumentbehärskning: Dela sidor  /  Sammanfoga dokument  /  Exportera urval i olika format (PDF/TXT/DOC/XLSX)  /  Batchkonvertera till PDF  /  Exportera sidor som bilder  /  Skriv ut flera filer samtidigt ...

Innehållsredigering: Batch Hitta och ersätt över flera filer   /  Ändra storlek på alla bilder   /  Transponera tabellrader och kolumner  /  Konvertera tabell till text ...

🧹 Enkel rengöringSvep bort Extra utrymmen  /  Avsnitt bryter  /   Alla rubriker  /  Textrutor  /  Hyperlänkar  /  För fler borttagningsverktyg, gå till vår Remove Group

Kreativa inlägg: Insert Tusen avskiljare  /  Kryssrutor  /  radio Knappar  /  QR-kod  /  Streckkod  /  Diagonal linjebord  /  Bildtext för ekvation  /  Bild Bildtext  /  Tabelltextning  /  Flera bilder  /  Upptäck mer i vår Insert Group

🔍 Precisionsval: Hitta specifika sidor  /  Tabellerna  /  former  /  rubrikerna  /  Navigera med lätthet med hjälp av vår Select Group

Stjärnförbättringar: Navigera snabbt till vilken plats som helst  /  infoga repetitiv text automatiskt  /  växla sömlöst mellan dokumentfönster  /  11 Konverteringsverktyg ...

Förvandla dina Word-uppgifter med Kutools. 👉 Ladda ner med 30-dagars provversion nu 🚀.

Läs mer       Gratis nedladdning      Inköp
 
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