I denne artikkelen vil vi presentere deg 3 metoder for å endre stilen til den første bokstaven i spesifikke ord i Word-dokumentet ditt.
En av de vanlige reglene for formatering av et dokument er å bruke stor bokstav i hver setning. Men i noen spesielle tilfeller, som for eksempel å jobbe med et kunstnerisk dokument, er det spesifikke krav vi må oppfylle.
Og i denne sost, vil vi vise deg 3 måter å endre stilen til den første bokstaven i ord i henhold til 3 forskjellige krav.
Metode 1: Endre stilen til den første bokstaven i hvert ord i et dokument
- Først og fremstost, trykk "Alt+ F11" for å starte VBA-redigering i Word.
- Klikk deretter "Normal" i venstre kolonne.
- Klikk deretter på "Sett inn" på menylinjen.
- Og klikk "Modul" på rullegardinmenyen.
- Dobbeltklikk nå på ny modul for å åpne den og lim inn følgende koder der:
Sub ChangeStyleOfFirstLetterInWords() Dim objWord As Range For Hvert objWord I ActiveDocument.Words ' Endre skriftstørrelsen for den første bokstaven i hvert ord. objWord.Characters(1).Font.Size = 16 ' Angi fet skrift for den første bokstaven i hvert ord. objWord.Characters(1).Font.Bold = True ' Endre skriftfargen for den første bokstaven i hvert ord. objWord.Characters(1).Font.Color = wdColorGreen Next End Sub
- Til slutt klikker du på "Kjør".
Her er resultatet:
Merknader:
-
Tegn(1). Font.Size = 16
Dette angir skriftstørrelsen på første bokstav i 16. Endre tallet som du vil.
-
Tegn(1). Font.Fet = Sant
Denne linjen setter første bokstav i fet skrift. Du kan endre "True" til "False" hvis du ikke trenger det.
-
Characters(1).Font.Color = wdColorGreen
Denne bruker grønn farge på bokstaven. Gå til følgende lenke for å velge ønsket farge: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa195614(v=office.11)
Metode 2: Endre stilen til den første bokstaven i det første ordet i alle setninger
- Først, installer og kjør makro som vist i metode 1.
- Erstatt deretter med denne makroen:
Sub ChangeStyleOfFirstLetterInSentence() Dim objSentence As Range For Every objSentence In ActiveDocument.Sentences ' Endre skriftstørrelsen for den første bokstaven i hver setning. objSentence.Words(1).Characters(1).Font.Size = 16 ' Angi fet skrift for den første bokstaven i hver setning. objSentence.Words(1).Characters(1).Font.Bold = True ' Endre skriftfargen for den første bokstaven i hver setning. objSentence.Words(1).Characters(1).Font.Color = wdColorGreen Next End Sub
Sjekk resultatet:
Metode 3: Endre stilen til den første bokstaven i det første ordet i alle avsnitt
- På samme måte, installer og kjør en makro ved å følge trinnene i metode 1.
- Bruk deretter denne makroen:
Sub ChangeStyleOfFirstLetterInParagraphs() Dim objParagraph As Word.Paragraph For Every objParagraph In ActiveDocument.Paragraphs ' Endre skriftstørrelsen for den første bokstaven i hvert avsnitt. objParagraph.Range.Words(1).Characters(1).Font.Size = 16 ' Angi fet skrift for den første bokstaven i hvert avsnitt. objParagraph.Range.Words(1).Characters(1).Font.Bold = True ' Endre skriftfargen for den første bokstaven i hvert avsnitt. objParagraph.Range.Words(1).Characters(1).Font.Bold = True Next End Sub
Se skjermbildet:
Beste tilnærming til å håndtere datatap
Det kan være veldig stressende å ha kritisk datatap. Derfor må du vite hvordan du skal håndtere en slik katastrofe. Og selvfølgelig er din beste løsning å få tak i en doc reparasjon nytte. Med den kan du få tilbake dataene dine på kortest mulig tid.
Forfatterintroduksjon:
Vera Chen er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert Excel reparasjon og pdf reparere programvareprodukter. For mer informasjon besøk www.datanumen. Med