Hvordan ændres skriftstørrelsen på kommentarballonen i Word-dokument?
Som vist nedenfor, hvis du vil forstørre skriftstørrelsen på kommentarballonen i Word-dokument, hvad kan du gøre? Denne artikel viser dig to metoder til at løse dette problem.
Skift skriftstørrelse på kommentarballon med indbyggingsfunktion i Word
Skift skriftstørrelse på kommentarballonen med VBA-kode
Skift skriftstørrelse på kommentarballon med indbyggingsfunktion i Word
Du kan ændre skriftstørrelsen på ballontekst direkte i ruden Alle stilarter i Word. Gør som følger.
1. Tryk på Ctrl + andre + Flytte + S nøgler til at åbne Styles rude.
2. i Styles rude, klik Indstillinger. Se skærmbillede:
3. I åbningen Indstillinger for stilrude vindue, vælg Alle styles fra Vælg stilarter, der skal vises rulleliste.
4. Klik derefter på OK at vende tilbage til Styles rude, rul venligst ned for at finde Ballontekst linje, skal du klikke på knappen for at udvide rullelisten, og klik derefter på Ændre. Se skærmbillede:
5. i Rediger stil vindue skal du vælge en skriftstørrelse, som du har brug for i Formatering sektion som vist nedenstående skærmbillede, og klik derefter på OK .
6. Luk Styles rude.
Derefter ændres skriftstørrelsen på alle kommentarballoner til den angivne.
Bemærk: Indstillingen gælder for alle kommentarer i fremtiden.
Skift skriftstørrelse på kommentarballonen med VBA-kode
Dette afsnit introducerer en VBA-kode, der hjælper dig med nemt at ændre skriftstørrelsen på kommentarballonen i Word-dokument.
1. I dokumentet ændres skriftstørrelsen på kommentarballonen, tryk på andre + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.
2. Klik på i vinduet indsatte > Moduler. Kopier derefter under VBA-koden i modulvinduet.
VBA-kode: ændre skriftstørrelsen på kommentarballonen 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. Tryk på F5 nøgle for at køre koden.
4. I den første Kutools for Word i dialogboksen, skal du indtaste en ny skrifttype til din kommentar og klikke OK.
5. I det andet Kutools for Word i dialogboksen, skriv skriftstørrelsen ind efter behov, og klik på OK.
Derefter ændres skriftstørrelsen på alle kommentarballoner til den angivne i det aktuelle dokument.
Bedste kontorproduktivitetsværktøjer
Kutools for Word - Forøg din Word-oplevelse med Over 100 Bemærkelsesværdige funktioner!
🤖 Kutools AI-assistent: Transformer din skrivning med AI - Generer indhold / Omskriv tekst / Opsummer dokumenter / Spørg for information baseret på Dokument, alt sammen i Word
📘 Dokumentbeherskelse: Opdelt sider / Flet dokumenter / Eksporter udvalg i forskellige formater (PDF/TXT/DOC/HTML...) / Batch Konverter til PDF / Eksporter sider som billeder / Udskriv flere filer på én gang...
✏ Indholdsredigering: Batch Find og erstat på tværs af flere filer / Ændr størrelse på alle billeder / Transponer tabelrækker og kolonner / Konverter tabel til tekst...
🧹 Ubesværet rengøring: Fej væk Ekstra pladser / Afsnit bryder / Alle overskrifter / Tekstbokse / Hyperlinks / For mere fjernelse af værktøjer, gå til vores Fjern gruppe...
➕ Kreative indlæg: Indsæt Tusind adskillere / Afkrydsningsfelter / Radio knapper / QR kode / Stregkode / Diagonal linjebord / Ligningstekst / Billede Caption / Tabeltekst / Flere billeder / Oplev mere i Indsæt gruppe...
???? Præcisionsvalg: Find ud af specifikke sider / tabeller / former / overskrifter / Forbedre navigation med mere Vælg funktioner...
⭐ Stjerneforbedringer: Naviger hurtigt til ethvert sted / automatisk indsæt gentagende tekst / skifte problemfrit mellem dokumentvinduer / 11 Konverteringsværktøjer...