Wie entfernt man ein Drop-Cap in Word?

Ein Drop-Cap ist ein großer Initialbuchstabe am Anfang eines Textblocks, der sich über zwei oder mehr Zeilen des laufenden Textes erstreckt. Er wird häufig am Beginn von Romanen eingesetzt. Die folgende Abbildung zeigt ein Beispiel für ein Drop-Cap:

Wenn Sie ein Drop-Cap entfernen müssen, können Sie dazu eine der folgenden Methoden verwenden:

• Drop-Cap manuell in Word entfernen
• Entfernen Sie alle Drop-Caps mit einem Klick aus dem Dokument mithilfe von Kutools für Word
• Entfernen Sie alle Drop-Caps aus dem Dokument mithilfe eines VBA-Codes

---

Drop-Cap manuell in Word entfernen

Sie können ein Drop-Cap manuell wie folgt entfernen:

1. Wählen Sie den Absatz aus, der das zu entfernende Initial enthält.
2. Klicken Sie auf die Registerkarte Einfügen und dann in der Gruppe Text auf Drop-Cap.
3. Wählen Sie Keine, um das Drop-Cap zu entfernen.

   

---

Entfernen Sie alle Drop-Caps mit einem Klick aus dem Dokument mithilfe von Kutools für Word

Kutools für Word bietet eine schnelle und einfache Möglichkeit, alle Initialen aus Ihrem Dokument zu entfernen – mit nur einem Klick sofort und vollständig.

Klicken Sie auf Kutools > Entfernen > Alle Initialen im ausgewählten Bereich entfernen, um alle Drop-Caps gleichzeitig aus dem Dokument zu entfernen. Tipp: Wenn Sie vorab einen Teil des Dokuments markieren, werden nur die Drop-Caps innerhalb dieser Auswahl entfernt.

---

Entfernen Sie alle Drop-Caps aus dem Dokument mithilfe eines VBA-Codes

Die Verwendung eines VBA-Codes ist eine schnelle und effiziente Möglichkeit, um alle Initialen (Drop Caps) aus Ihrem Dokument zu entfernen. Gehen Sie dazu wie folgt vor:

1. Drücken Sie Alt + F11, um den VBA-Editor in Word zu öffnen.
2. Klicken Sie auf Einfügen>Modul, und fügen Sie den folgenden VBA-Code in das Modulfenster ein.

   Sub RemoveDropCaps()
   Dim oRng As Range
   On Error Resume Next
   For i=1 To ActiveDocument.Paragraphs.Count
   Set oRng=ActiveDocument.Paragraphs(i).Range
   With oRng.Paragraphs(1).DropCap
   .Position=wdDropNone
   End With
   Next i
   End Sub

3. Klicken Sie auf die Schaltfläche Ausführen, um den VBA-Code auszuführen.

---