3 szybkie sposoby zmiany stylu pierwszej litery określonych słów w dokumencie programu Word

W tym artykule chcielibyśmy przedstawić 3 metody zmiany stylu pierwszej litery określonych słów w dokumencie Worda.

Jedną z powszechnych zasad formatowania dokumentu jest pisanie dużej litery w każdym zdaniu. Ale w niektórych szczególnych przypadkach, takich jak praca nad dokumentem artystycznym, musimy spełnić określone wymagania.

W tym poście pokażemy Ci 3 sposoby na zmianę stylu pierwszej litery słowa zgodnie z 3 różnymi wymaganiami.

Metoda 1: Zmień styl pierwszej litery każdego wyrazu w dokumencie

1. Przede wszystkim naciśnij „Alt+F11”, aby wywołać edytor VBA w programie Word.
2. Następnie kliknij „Normalne” w lewej kolumnie.
3. Następnie na pasku menu kliknij „Wstaw”.
4. I kliknij „Moduł” w menu rozwijanym.
5. Teraz kliknij dwukrotnie nowy moduł, aby go otworzyć i wklej tam następujące kody:

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 koniec kliknij „Uruchom”.

Oto wynik:

Uwagi:

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

To ustawia rozmiar czcionki pierwszej litery w 16. Zmień liczbę, jak chcesz.

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

W tym wierszu pierwsza litera jest pogrubiona. Jeśli nie potrzebujesz, możesz zmienić „True” na „False”.

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

Ten nadaje literze kolor zielony. Odwiedź poniższy link, aby wybrać żądany kolor: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa195614(v=office.11)

Metoda 2: Zmień styl pierwszej litery pierwszego słowa we wszystkich zdaniach

1. Najpierw zainstaluj i uruchom makro, jak pokazano w metodzie 1.
2. Następnie zamień na to 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

Sprawdź wynik:

Metoda 3: Zmień styl pierwszej litery pierwszego słowa we wszystkich akapitach

1. Podobnie zainstaluj i uruchom makro, wykonując czynności opisane w metodzie 1.
2. Następnie użyj tego makra:

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

Zobacz zrzut ekranu:

Najlepsze podejście do obsługi utraty danych

Utrata krytycznych danych może być bardzo stresująca. Dlatego musisz wiedzieć, jak sobie radzić z taką katastrofą. Oczywiście najlepszym rozwiązaniem jest zdobycie domeny naprawa doc użyteczność. Dzięki niemu możesz odzyskać swoje dane w najkrótszym czasie.

Wprowadzenie autora:

Vera Chen jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym Naprawa programu Excel i pdf oprogramowanie do naprawy. po więcej informacji odwiedź www.datanumen.com