Hoe verwijdert u een initialenversiering in Word?

Een initialenversiering is een opvallende hoofdletter aan het begin van een tekstblok die zich uitstrekt over twee of meer regels standaardtekst – een klassiek designelement vaak gezien aan het begin van romans. Hieronder ziet u een voorbeeld van zo’n initialenversiering:

Als u een initialenversiering moet verwijderen, kunt u hiervoor een van de volgende methoden gebruiken:

• Verwijder een initialenversiering handmatig in Word
• Verwijder alle initialenversieringen uit het document met één klik met behulp van Kutools voor Word
• Verwijder alle initialenversieringen uit het document met VBA-code

---

Verwijder een initialenversiering handmatig in Word

U kunt een initialenversiering handmatig verwijderen door de volgende stappen te volgen:

1. Selecteer de alinea met de initialenversiering die u wilt verwijderen.
2. Klik op het tabblad Invoegen en vervolgens op Initialenversiering in de groep Tekst.
3. Selecteer Geenom de initialenversiering te verwijderen.

   

---

Verwijder alle initialenversieringen uit het document met één klik met behulp van Kutools voor Word

Kutools voor Word biedt een snelle en eenvoudige manier om alle initialenversieringen uit uw document te verwijderen – met slechts één klik verwijdert u ze direct.

Klik op Kutools > Verwijderen > Verwijder Alle Initiaalletters in Geselecteerd Bereik om alle initialenversieringen tegelijk uit het document te verwijderen.Tip: Als u eerst een gedeelte van het document selecteert, worden alleen de initialenversieringen in die selectie verwijderd.

---

Verwijder alle initialenversieringen uit het document met VBA-code

Het gebruik van VBA-code is een snelle en efficiënte manier om alle initialenversieringen uit uw document te verwijderen. Volg deze stappen:

1. Druk op Alt + F11 om de VBA-editor in Word te openen.
2. Klik op Invoegen>Moduleen plak de volgende VBA-code in het modulevenster.

   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. Klik op de knop Uitvoeren om de VBA-code uit te voeren.

---