Note: The other languages of the website are Google-translated. Back to English

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.


Rekommenderade Word-produktivitetsverktyg

 

Kutools för Word - Mer än 100 avancerade funktioner för Word, spara 50% tid

  • Komplicerade och upprepade operationer kan göras engångsbehandling på några sekunder.
  • Infoga flera bilder över mappar i Word-dokumentet samtidigt.
  • Slå ihop och kombinera flera Word-filer över mappar till en med önskad ordning.
  • Dela upp det aktuella dokumentet i separata dokument enligt rubrik, avsnittbrytning eller andra kriterier.
  • Konvertera filer mellan Doc och Docx, Docx och PDF, samling verktyg för vanliga konverteringar och val, och så vidare ...
Sortera kommentarer efter
Kommentarer (0)
Inga betyg än. Bli först med att betygsätta!
Det finns inga kommentarer här ännu
Lämna dina kommentarer
Postar som gäst
×
Betygsätt detta inlägg:
0  Tecken
Föreslagna platser