Në këtë artikull, ne dëshirojmë t'ju paraqesim 3 metoda për të ndryshuar stilin e shkronjës së parë të fjalëve specifike në dokumentin tuaj Word.
Një nga rregullat e zakonshme të formatimit të një dokumenti është të shkruani shkronjën e parë të çdo fjalie. Por në disa raste të veçanta, si puna për një dokument artistik, ka kërkesa specifike që duhet të plotësojmë.
Dhe në këtë postim, do t'ju tregojmë 3 mënyra për të ndryshuar stilin e shkronjës së parë të fjalëve sipas 3 kërkesave të ndryshme.
Metoda 1: Ndryshoni stilin e shkronjës së parë të çdo fjale në një dokument
- Para së gjithash, shtypni "Alt + F11" për të thirrur redaktorin VBA në Word.
- Pastaj klikoni "Normal" në kolonën e majtë.
- Tjetra në shiritin e menusë, klikoni "Fut".
- Dhe klikoni "Modul" në menunë rënëse.
- Tani klikoni dy herë në modulin e ri për ta hapur atë dhe ngjitni kodet e mëposhtme atje:
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
- Në fund, klikoni "Run".
Këtu është rezultati:
Shënime:
-
Characters(1).Font.Size = 16
Kjo vendos madhësinë e shkronjave të shkronjës së parë në 16. Ndryshoni numrin sipas dëshirës.
-
Characters(1).Font.Bold = True
Ky rresht vendos shkronjën e parë me shkronja të zeza. Mund ta ndryshoni "E vërtetë" në "False" nëse nuk keni nevojë.
-
Characters(1).Font.Color = wdColorGreen
Kjo aplikon ngjyrën e gjelbër në shkronjë. Vizitoni lidhjen e mëposhtme për të zgjedhur ngjyrën e dëshiruar: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa195614(v=office.11)
Metoda 2: Ndryshoni stilin e shkronjës së parë të fjalës së parë në të gjitha fjalitë
- Së pari, instaloni dhe ekzekutoni makro siç tregohet në metodën 1.
- Pastaj zëvendësojeni me këtë 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
Kontrolloni rezultatin:
Metoda 3: Ndryshoni stilin e shkronjës së parë të fjalës së parë në të gjithë paragrafët
- Në mënyrë të ngjashme, instaloni dhe ekzekutoni një makro në hapat e mëposhtëm në metodën 1.
- Më pas përdorni këtë 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
Shikoni pamjen e ekranit:
Qasja më e mirë për trajtimin e humbjes së të dhënave
Mund të jetë shumë stresuese të kesh humbje kritike të të dhënave. Prandaj, duhet të dini se si të merreni me një fatkeqësi të tillë. Dhe sigurisht, zgjidhja juaj më e mirë është të kapni një riparim dok dobia. Me të, ju mund t'i ktheni të dhënat tuaja në kohën më të vogël.
Hyrje e autorit:
Vera Chen është një eksperte për rikuperimin e të dhënave DataNumen, Inc., e cila është lider botëror në teknologjitë e rikuperimit të të dhënave, duke përfshirë Riparimi i Excel-it pdf riparimin e produkteve softuerike. Për më shumë informacion vizitoni www.datanumen.com




