3 Schnelle Möglichkeiten, um den Stil des ersten Buchstabens bestimmter Wörter in Ihrem Word-Dokument zu ändern

Jetzt teilen:

In diesem Artikel möchten wir Ihnen drei Methoden vorstellen, mit denen Sie den Stil des ersten Buchstabens bestimmter Wörter in Ihrem Word-Dokument ändern können.

Eine der allgemeinen Regeln für die Formatierung eines Dokuments besteht darin, den ersten Buchstaben jedes Satzes in Großbuchstaben zu schreiben. In einigen besonderen Fällen, beispielsweise bei der Arbeit an einem künstlerischen Dokument, müssen wir jedoch bestimmte Anforderungen erfüllen.

In diesem Beitrag zeigen wir Ihnen drei Möglichkeiten, den Stil des ersten Buchstabens von Wörtern gemäß drei verschiedenen Anforderungen zu ändern.Ändern Sie den Stil des ersten Buchstabens bestimmter Wörter in Ihrem Word-Dokument

Methode 1: Ändern Sie den Stil des ersten Buchstabens jedes Wortes in einem Dokument

  1. Drücken Sie zunächst „Alt+F11“, um den VBA-Editor in Word aufzurufen.
  2. Klicken Sie dann in der linken Spalte auf "Normal".
  3. Klicken Sie anschließend in der Menüleiste auf "Einfügen".
  4. Klicken Sie im Dropdown-Menü auf "Modul".Klicken Sie auf "Normal" -> Klicken Sie auf "Einfügen" -> Klicken Sie auf "Modul"
  5. Doppelklicken Sie nun auf das neue Modul, um es zu öffnen und fügen Sie dort folgende Codes ein:
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
  1. Klicken Sie abschließend auf "Ausführen".Codes einfügen-> Klicken Sie auf "Ausführen"

Hier ist das Ergebnis:Gestalten Sie den ersten Buchstaben jedes Wortes im Dokument

Hinweis:

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

Dadurch wird die Schriftgröße des ersten Buchstabens auf 16 festgelegt. Ändern Sie die Zahl nach Ihren Wünschen.

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

Diese Zeile setzt den ersten Buchstaben fett. Sie können "True" in "False" ändern, wenn Sie dies nicht benötigen.

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

Dieser wendet grüne Farbe auf Buchstaben an. Besuchen Sie den folgenden Link, um die gewünschte Farbe auszuwählen: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa195614(v=office.11)

Methode 2: Ändern Sie den Stil des ersten Buchstabens des ersten Wortes in allen Sätzen

  1. Installieren Sie zunächst das Makro und führen Sie es aus, wie in Methode 1 gezeigt.
  2. Dann ersetzen Sie durch dieses 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

Überprüfen Sie das Ergebnis:Gestalte den ersten Buchstaben des ersten Wortes in allen Sätzen

Methode 3: Ändern Sie den Stil des ersten Buchstabens des ersten Wortes in allen Absätzen

  1. Installieren und führen Sie in ähnlicher Weise ein Makro aus, indem Sie die Schritte in Methode 1 ausführen.
  2. Verwenden Sie als nächstes dieses 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

Siehe den Screenshot:Gestalten Sie den ersten Buchstaben des ersten Wortes in allen Absätzen

Bester Ansatz zum Umgang mit Datenverlust

Es kann sehr stressig sein, einen kritischen Datenverlust zu haben. Daher müssen Sie wissen, wie Sie mit einer solchen Katastrophe umgehen können. Und natürlich ist Ihre beste Lösung, eine zu ergattern doc Reparatur Nützlichkeit. Damit können Sie Ihre Daten in kürzester Zeit zurückerhalten.

Einführung des Autors:

Vera Chen ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich Excel-Reparatur und pdf Reparatur von Softwareprodukten. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX

Jetzt teilen:

Kommentare sind geschlossen.