Kako spremeniti velikost pisave oblačka komentarja v dokumentu Word?

Kot lahko vidite, če želite v besedilu Word povečati velikost pisave v komentarju, kaj lahko storite? Ta članek vam bo pokazal dva načina za rešitev te težave.

Spremenite velikost pisave oblačka komentarja z vgrajeno funkcijo v Wordu

Spremenite velikost pisave oblačka komentarja s kodo VBA

Spremenite velikost pisave oblačka komentarja z vgrajeno funkcijo v Wordu

Velikost pisave besedila oblačka lahko neposredno spremenite v podoknu Vsi slogi v Wordu. Naredite naslednje.

1. Pritisnite Ctrl + druga + Shift + S tipke za odpiranje Slogi okno.

2. V Ljubljani Slogi podokno, kliknite možnosti. Oglejte si posnetek zaslona:

3. Na odprtju Možnosti podokna sloga okno, izberite Vsi slogi Iz Izberite sloge za prikaz spustni seznam.

4. Nato kliknite OK da se vrnete v Slogi podokno, se pomaknite navzdol in poiščite Balonsko besedilo kliknite vrstico gumb, da razširite spustni seznam, in nato kliknite spreminjanje. Oglejte si posnetek zaslona:

5. V Ljubljani Spremeni slog v oknu izberite velikost pisave, kot jo potrebujete Oblikovanje , kot je prikazano na spodnji sliki zaslona, ​​in nato kliknite OK gumb.

6. Zaprite Slogi okno.

Nato se velikost pisave vseh komentarjev spremeni v določeno.

Opombe: Nastavitev bo v prihodnosti veljala za vse komentarje.

Spremenite velikost pisave oblačka komentarja s kodo VBA

Ta razdelek bo predstavil kodo VBA, ki vam bo pomagala enostavno spremeniti velikost pisave oblačka komentarjev v dokumentu Word.

1. V dokumentu boste spremenili velikost pisave oblačka za komentar, pritisnite tipko druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V oknu kliknite Vstavi > Moduli. Nato kopirajte spodnjo kodo VBA v okno modula.

Koda VBA: spremenite velikost pisave oblačka komentarja v Wordu

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. Pritisnite F5 tipko za zagon kode.

4. V prvem Kutools za Word v pogovorno okno vnesite novo pisavo za komentar in kliknite OK.

5. V drugem Kutools za Word v pogovorno okno vnesite želeno velikost pisave in kliknite OK.

Nato se velikost pisave vseh oblačkov komentarjev spremeni v določeno v trenutnem dokumentu.

---

Priporočena orodja za produktivnost besed

 

Kutools za Word - Več kot 100 naprednih funkcij za Word, prihranite 50% časa

• Zapletene in ponavljajoče se operacije je mogoče enkrat obdelati v nekaj sekundah.
• V Wordov dokument hkrati vstavite več slik v mape.
• Združite in združite več datotek Word v mapah v eno z želenim vrstnim redom.
• Trenutni dokument razdelite na ločene dokumente glede na naslov, prelom odseka ali druga merila.
• Pretvarjanje datotek med dokumenti Doc in Docx, Docx in PDF, zbirka orodij za pogoste pretvorbe in izbiro itd. ...

Preberi več Prenesi zdaj Nakup