3 nopeaa tapaa muuttaa Word-asiakirjan ensimmäisen kirjaimen tyyli

Word-ratkaisut Syyskuu 28, 2025

Tässä artikkelissa haluamme esitellä sinulle 3 tapaa muuttaa tiettyjen sanojen ensimmäisen kirjaimen tyyliä Word-asiakirjassa.

Yksi asiakirjan muotoilun yleisistä säännöistä on isojen kirjainten käyttö jokaisessa lauseessa. Joissakin erityistapauksissa, kuten taiteellisen asiakirjan parissa, on kuitenkin erityisiä vaatimuksia, jotka meidän on täytettävä.

Ja tässä viestissä näytämme sinulle 3 tapaa muuttaa sanojen ensimmäisen kirjaimen tyyliä 3 eri vaatimuksen mukaan.

Tapa 1: Muuta asiakirjan jokaisen sanan ensimmäisen kirjaimen tyyli

Ensinnäkin, paina "Alt + F11" avataksesi VBA-editorin Wordissa.
Napsauta sitten “Normaali” vasemmassa sarakkeessa.
Napsauta seuraavaksi valikkorivillä "Lisää".
Napsauta avattavassa valikossa Moduuli.
Kaksoisnapsauta uutta moduulia avataksesi sen ja liitä seuraavat koodit sinne:

Sub ChangeStyleOfFirstLetterInWords()
  Dim objWord As Range
 
  For Each objWord In ActiveDocument.Words
    ' Change the font size for the first letter in every word.
    objWord.Characters(1).Font.Size = 16
    ' Set Bold font for the first letter in every word.
    objWord.Characters(1).Font.Bold = True
    ' Change the font color for the first letter in every word.
    objWord.Characters(1).Font.Color = wdColorGreen
  Next
End Sub

Napsauta lopuksi Suorita.

Tässä on tulos:

Huomautuksia:

```
Characters(1).Font.Size = 16
```

Tämä asettaa ensimmäisen kirjaimen kirjasinkoon 16. Muuta numero haluamallasi tavalla.

```
Characters(1).Font.Bold = True
```

Tämä rivi asettaa ensimmäisen kirjaimen lihavoituna. Voit vaihtaa “True” arvoksi “False”, jos et tarvitse sitä.

```
Characters(1).Font.Color = wdColorGreen
```

Tämä käyttää vihreää väriä kirjeisiin. Valitse haluamasi väri seuraavasta linkistä: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa195614(v=office.11)

Tapa 2: Muuta ensimmäisen sanan ensimmäisen kirjaimen tyyli kaikissa lauseissa

Ensinnäkin, asenna ja suorita makro menetelmän 1 mukaisesti.
Korvaa sitten tällä makrolla:

Sub ChangeStyleOfFirstLetterInSentence()
  Dim objSentence As Range
 
  For Each objSentence In ActiveDocument.Sentences
    ' Change the font size for the first letter in every sentence.
    objSentence.Words(1).Characters(1).Font.Size = 16
    ' Set Bold font for the first letter in every sentence.
    objSentence.Words(1).Characters(1).Font.Bold = True
    ' Change the font color for the first letter in every sentence.
    objSentence.Words(1).Characters(1).Font.Color = wdColorGreen
  Next
End Sub

Tarkista tulos:

Tapa 3: Muuta ensimmäisen sanan ensimmäisen kirjaimen tyyli kaikissa kappaleissa

Asenna ja suorita makro vastaavasti menetelmän 1 vaiheiden mukaisesti.
Seuraavaksi käytä tätä makroa:

Sub ChangeStyleOfFirstLetterInParagraphs()
  Dim objParagraph As Word.Paragraph
 
  For Each objParagraph In ActiveDocument.Paragraphs
    ' Change the font size for the first letter in every paragraph.
    objParagraph.Range.Words(1).Characters(1).Font.Size = 16
    ' Set Bold font for the first letter in every paragraph.
    objParagraph.Range.Words(1).Characters(1).Font.Bold = True
    ' Change the font color for the first letter in every paragraph.
     objParagraph.Range.Words(1).Characters(1).Font.Bold = True
  Next
End Sub

Katso kuvakaappaus:

Paras tapa käsitellä tietojen menetystä

Kriittinen tietojen menetys voi olla erittäin stressaavaa. Siksi sinun on tiedettävä, miten käsitellä tällaista katastrofia. Ja tietysti paras ratkaisu on saada käsiinsä a doc-korjaus apuohjelma. Sen avulla saat tietosi takaisin lyhyessä ajassa.

Tekijän esittely:

Vera Chen on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien Excel-korjaus ja pdf korjata ohjelmistotuotteita. Lisätietoja osoitteessa www.datanumen.com