3 snabba sätt att ändra stil för den första bokstaven med specifika ord i ditt Word-dokument

I den här artikeln vill vi presentera tre metoder för att ändra stilen för den första bokstaven med specifika ord i ditt Word-dokument.

En av de vanliga reglerna för formatering av ett dokument är att använda den första bokstaven i varje mening. Men i vissa speciella fall, som att arbeta med ett konstnärligt dokument, finns det specifika krav som vi måste uppfylla.

Och i det här inlägget visar vi dig 3 sätt att ändra stilen på den första bokstaven i ett ord enligt 3 olika krav.

Metod 1: Ändra stilen för första bokstaven i varje ord i ett dokument

1. Först och främst, tryck på "Alt + F11" för att starta VBA-editorn i Word.
2. Klicka sedan på “Normal” i den vänstra kolumnen.
3. Klicka sedan på ”Infoga” i menyraden.
4. Och klicka på "Modul" i rullgardinsmenyn.
5. Dubbelklicka nu på den nya modulen för att öppna den och klistra in följande koder där:

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

6. Klicka slutligen på "Kör".

Här är resultatet:

Anmärkningar:

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

Detta ställer in teckenstorleken för första bokstaven i 16. Ändra numret som du vill.

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

Denna rad anger första bokstaven med fetstil. Du kan ändra “True” till “False” om du inte behöver det.

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

Den här använder grön färg på bokstaven. Besök följande länk för att välja önskad färg: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa195614(v=office.11)

Metod 2: Ändra stilen för första bokstaven i första ordet i alla meningar

1. För det första, installera och kör makro som visas i metod 1.
2. Ersätt sedan med detta makro:

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

Kontrollera resultatet:

Metod 3: Ändra stilen för första bokstaven i första ordet i alla stycken

1. Installera och kör ett makro på samma sätt genom att följa stegen i metod 1.
2. Använd sedan detta makro:

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

Se skärmdumpen:

Bästa sättet att hantera dataförlust

Det kan vara mycket stressande att ha kritisk dataförlust. Därför måste du veta hur man hanterar en sådan katastrof. Och naturligtvis är din bästa lösning att få tag på en doc reparation verktyg. Med den kan du få tillbaka dina data på kortast möjliga tid.

Författarintroduktion:

Vera Chen är en dataåterställningsexpert i DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive Excel-reparation och pdf reparera programvaruprodukter. För mer information besök www.datanumen.com