3 brza načina da promijenite stil prvog slova određenih riječi u vašem Word dokumentu

U ovom članku želimo vam predstaviti 3 metode za promjenu stila prvog slova određenih riječi u vašem Word dokumentu.

Jedno od uobičajenih pravila oblikovanja dokumenta je veliko slovo svake rečenice. Ali u nekim posebnim slučajevima, kao što je rad na umjetničkom dokumentu, postoje specifični zahtjevi koje moramo ispuniti.

I u ovom postu, pokazat ćemo vam 3 načina za promjenu stila prvog slova riječi prema 3 različita zahtjeva.

Metoda 1: Promijenite stil prvog slova svake riječi u dokumentu

1. Prvo i najvažnije, pritisnite "Alt+F11" da biste pozvali VBA editor u Wordu.
2. Zatim kliknite na "Normalno" na lijevoj koloni.
3. Zatim na traci menija kliknite na “Insert”.
4. I kliknite na “Module” na padajućem izborniku.
5. Sada dvaput kliknite na novi modul da ga otvorite i tamo zalijepite sljedeće kodove:

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. Na kraju, kliknite "Pokreni".

Evo ishoda:

Napomene:

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

Ovo postavlja veličinu fonta prvog slova u 16. Promijenite broj kako želite.

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

Ova linija postavlja prvo slovo podebljano. Možete promijeniti “True” u “False” ako vam nije potrebno.

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

Ovaj primjenjuje zelenu boju na slovo. Posjetite sljedeći link kako biste odabrali željenu boju: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa195614(v=office.11)

Metoda 2: Promijenite stil prvog slova prve riječi u svim rečenicama

1. Prvo, instalirajte i pokrenite makro kao što je prikazano u metodi 1.
2. Zatim zamijenite ovim makroom:

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

Provjerite rezultat:

Metoda 3: Promijenite stil prvog slova prve riječi u svim pasusima

1. Slično tome, instalirajte i pokrenite makro slijedeći korake iz metode 1.
2. Zatim koristite ovaj 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

Pogledajte snimak ekrana:

Najbolji pristup rukovanju gubitkom podataka

Gubitak kritičnih podataka može biti veoma stresan. Stoga morate znati kako se nositi s takvom katastrofom. I naravno, vaše najbolje rješenje je da nabavite a doc repair korisnost. Pomoću njega možete vratiti svoje podatke u najkraćem mogućem roku.

Uvod za autora:

Vera Chen je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući Excel popravka i pdf popravak softverskih proizvoda. Za više informacija posjetite www.datanumen.com