Hoe wijzigt u alle exemplaren van Kop 1 tegelijkertijd naar Kop 2 in een Word-document?

Bij het werken met Word-documenten die diverse stijlen bevatten – zoals Titel, Ondertitel, Kop 1, Kop 2 en meer – moet u de structuur van uw document soms herorganiseren voor meer duidelijkheid of consistentie. Stel bijvoorbeeld dat uw document momenteel de stijl „Kop 1” gebruikt voor bepaalde secties, maar na herziening blijkt dat al die sectiekoppen eigenlijk de stijl „Kop 2” zouden moeten dragen. Elk exemplaar handmatig aanpassen is dan zeer tijdrovend, zeker in een lang document met tientallen of zelfs honderden koppen. In dit artikel bespreken we verschillende praktische methoden om alle exemplaren van Kop 1 tegelijkertijd efficiënt om te zetten naar de stijl Kop 2 in Word.

Wijzig alle exemplaren van kop 1 tegelijkertijd naar kop 2

VBA-code – Batchconversie van Kop 1 naar Kop 2 in het hele document

---

Wijzig alle exemplaren van kop 1 tegelijkertijd naar kop 2

De volgende methode gebruikt het ingebouwde stijlenvenster in Word om alle exemplaren van Kop 1 in één keer te wijzigen naar Kop 2. Ideaal als u visueel wilt werken en de wijzigingen onderweg nogmaals wilt controleren.

1. Plaats uw cursor in een willekeurige alinea met de stijl Kop 1 in uw document om de stijl te activeren. Ga vervolgens naar het tabblad Start en klik op de dialoogvensterstarter in de groep Stijlen. Hiermee opent u het stijlenvenster, dat een lijst toont van alle stijlen die momenteel in het document worden gebruikt.

2. Zoek in het stijlenvenster dat aan de rechterkant verschijnt de stijl StijlenKop 1. Klik met de rechtermuisknop op Kop 1 en kies Alles selecteren in het weergegeven menu. Hierdoor worden automatisch alle alinea’s met de stijl Kop 1 in uw document geselecteerd—ideaal voor grote bestanden, want u hoeft niet langer elke kop handmatig te zoeken en te selecteren.

3. Met alle Kop1-tekst nu geselecteerd, klikt u eenvoudigweg op Kop 2 in het Stijlen-venster. Alle geselecteerde koppen krijgen onmiddellijk de nieuwe stijl Kop 2 in plaats van Kop 1. Deze bulkactie bespaart niet alleen tijd, maar zorgt ook voor een consistente opmaak in uw document.

Tips en overwegingen: Zorg ervoor dat alle tekst die u wilt converteren daadwerkelijk is opgemaakt als Kop 1 voordat u begint. Soms wordt handmatig opgemaakte tekst — bijvoorbeeld vetgedrukt en vergroot zonder de stijl ‘Kop 1’ toe te passen — niet meegenomen in de conversie. Als veel koppen handmatig zijn opgemaakt, is het raadzaam om eerst de stijl ‘Kop 1’ toe te passen voor een soepele conversie. Controleer na de conversie of alleen de bedoelde tekst is gewijzigd. Mocht u per ongeluk onbedoelde tekst hebben geselecteerd, dan kunt u de functie Ongedaan maken (Ctrl + Z) gebruiken om de wijzigingen terug te draaien en het proces met aanpassingen opnieuw uit te voeren.

Deze methode is gebruiksvriendelijk, vraagt geen geavanceerde technische vaardigheden en is daardoor ideaal voor reguliere gebruikers die middelgrote documenten beheren.

---

VBA-code – Batchconversie van Kop 1 naar Kop 2 in het hele document

Voor geavanceerdere scenario’s, zoals bij het werken met grote of zeer complexe documenten, biedt een VBA-macro een geautomatiseerde en efficiënte manier om alle alinea’s met de stijl Kop 1 tegelijkertijd te wijzigen naar Kop 2. Deze oplossing is vooral nuttig als u deze taak herhaaldelijk moet uitvoeren of meerdere documenten snel moet verwerken.

Toepasselijke scenario’s: Kies deze aanpak wanneer uw document veel kopniveaus bevat, te lang is voor handmatige bewerking, of wanneer meerdere secties met Kop 1 verspreid staan door het document en u volledige dekking wilt garanderen zonder exemplaren te missen. Met VBA voert u de conversie snel en programmatisch uit, waardoor het risico op menselijke fouten aanzienlijk wordt verminderd.

Beperkingen: VBA vereist mogelijk dat de macrobeveiligingsinstellingen in Word zijn ingeschakeld, en het rechtstreeks bewerken van de macro is mogelijk niet geschikt voor gebruikers die geen ervaring hebben met scripting. Maak altijd een back-up van uw document voordat u macro’s uitvoert, om onbedoeld gegevensverlies te voorkomen.

1. Open uw Word-document. U hoeft geen tekst te selecteren voordat u de macro uitvoert – de macro verwerkt automatisch het hele document.

2. Druk op de toetsencombinatie Alt+F11 om het venster Microsoft Visual Basic for Applications te openen. Klik in het VBA-venster op Invoegen > Module om een nieuwe module te maken. Kopieer en plak vervolgens de volgende VBA-code in de module.

VBA-code: Wijzig alle alinea’s met Kop 1 naar Kop 2 in het document

Sub ChangeHeading1toHeading2()
    Dim para As Paragraph
    Dim countChanged As Long
    Dim xTitleId As String
    On Error Resume Next

    xTitleId = "Kutools for Word"
    countChanged = 0

    For Each para In ActiveDocument.Paragraphs
        ' Built-in style names include a space: "Heading 1"
        If para.Style = ActiveDocument.Styles("Heading 1") Then
            para.Style = ActiveDocument.Styles("Heading 2")
            countChanged = countChanged + 1
        End If
    Next para

    MsgBox countChanged & " Heading 1 paragraphs changed to Heading 2.", _
           vbInformation, xTitleId
End Sub

3. Sluit de VBA-editor. Om de macro uit te voeren, keert u terug naar het Word-venster en drukt u op Alt+F8 om de macrolijst te openen. Selecteer ChangeHeading1toHeading2 en klik op Uitvoeren. De macro doorzoekt automatisch het hele document en wijzigt elke alinea met de stijl Kop 1 naar Kop 2. Na voltooiing verschijnt een dialoogvenster met het totale aantal gewijzigde koppen.

Tip: Sla uw document op voordat u de macro uitvoert, zodat u de actie indien nodig ongedaan kunt maken. Houd er rekening mee dat de macro alle alinea’s met exact de stijl „Kop 1” aanpast – aangepaste of gewijzigde stijlnamen blijven ongewijzigd. Als u werkt met aangepaste stijlnamen, dient u de code dienovereenkomstig aan te passen. Mocht er een fout optreden of worden er geen wijzigingen doorgevoerd, controleer dan of uw koppen correct zijn opgemaakt. En mocht het resultaat niet aan uw verwachtingen voldoen, dan kunt u de macro altijd ongedaan maken met Ctrl + Z.

Deze VBA-aanpak is zeer effectief voor batchverwerking en biedt grote bruikbaarheid bij grootschalige of repetitieve opmaaktaken.

---