Skip to main content

Hoe alle samengevoegde cellen in Excel te identificeren en selecteren?

Author: Tech Support Last Modified: 2025-05-29

Weet u hoe u alle samengevoegde cellen in Excel kunt vinden en selecteren? Hier zijn drie handige manieren om alle samengevoegde cellen in een selectie of bereik in Excel snel te identificeren en te selecteren.

identify and select all merged cells

Identificeer en selecteer alle samengevoegde cellen met de Zoeken-opdracht

Snel alle samengevoegde cellen selecteren en tellen met Kutools voor Excel

Alle samengevoegde cellen identificeren met VBA-code


Identificeer en selecteer alle samengevoegde cellen met de Zoeken-opdracht

U kunt alle samengevoegde cellen in het actieve werkblad identificeren en selecteren door middel van de Zoeken-opdracht met de volgende stappen:

1. Klik op Start > Zoeken en selecteren > Zoeken om het dialoogvenster Zoeken en vervangen te openen. U kunt het dialoogvenster Zoeken en vervangen ook openen door op Ctrl + F te drukken.

2. Klik op de knop Opmaak in het dialoogvenster, (Als u de knop Opmaak niet kunt vinden, klikt u op de knop Opties om het dialoogvenster uit te vouwen.) zie screenshot:

Click the Format button in the dialog box

3. In het pop-upvenster Zoekopmaak vinkt u alleen de optie Samengevoegde cellen aan in de sectie Tekstbediening onder het tabblad Uitlijning, en klikt u op OK.

check the Merge Cells option in the dialog box

4. Nu keert u terug naar het dialoogvenster Zoeken en vervangen, klik op de knop Alles zoeken. Alle samengevoegde cellen worden onderaan dit dialoogvenster weergegeven. Selecteer alle zoekresultaten door de Shift-toets ingedrukt te houden.

Nu zijn alle samengevoegde cellen in het actieve werkblad geselecteerd wanneer u alle zoekresultaten selecteert. Zie screenshot:

all merged cells are selected when selecting all finding results

Tips: Als u alleen samengevoegde cellen in een selectie wilt identificeren, vinden en selecteren, moet u eerst het bereik selecteren.


Selecteer en tel alle samengevoegde cellen met Kutools voor Excel

Het hulpmiddel Samengevoegde cellen selecteren van Kutools voor Excel helpt u bij het identificeren, vinden en selecteren van alle samengevoegde cellen in een selectie met slechts één klik.

Kutools voor Excel biedt meer dan 300 geavanceerde functies om complexe taken te stroomlijnen, waardoor creativiteit en efficiëntie worden vergroot. Geïntegreerd met AI-mogelijkheden, automatiseert Kutools taken met precisie, waardoor gegevensbeheer moeiteloos wordt. Gedetailleerde informatie over Kutools voor Excel...  Gratis proefversie...

Na installatie van Kutools voor Excel doet u het volgende:( Download nu gratis Kutools voor Excel! )

1. Selecteer het gegevensbereik waarin u de samengevoegde cellen wilt selecteren.

2. Klik op Kutools > Selecteren > Samengevoegde cellen selecteren, zie screenshot:

Click Kutools > Select > Select Merged Cells

3. En alle samengevoegde cellen in de selectie zijn in één keer geselecteerd, en het aantal samengevoegde cellen wordt ook geteld, zie screenshot:

all the merged cells are selected

Tip: Om deze functie te gebruiken, moet u eerst Kutools voor Excel installeren, klik om nu te downloaden en een gratis proefperiode van 30 dagen te starten .

Identificeer alle samengevoegde cellen met VBA-code

VBA 1: Identificeer en markeer alle samengevoegde cellen

1. Houd de toetsen ALT + F11 ingedrukt, en het venster Microsoft Visual Basic for Applications wordt geopend.

2. Klik op Invoegen > Module, en plak de volgende macro in het modulevenster.

Sub FindMergedcells()
'updateby Extendoffice
Dim x As Range
For Each x In ActiveSheet.UsedRange
If x.MergeCells Then
x.Interior.ColorIndex = 8
End If
Next
End Sub

3. Druk op de F5-toets om deze macro uit te voeren. Alle samengevoegde cellen in het actieve werkblad worden geïdentificeerd en gemarkeerd, zie screenshot:

vba code to highlight all merged cells

VBA 2: Identificeer en lijst alle samengevoegde cellen

1. Houd de toetsen ALT + F11 ingedrukt, en het venster Microsoft Visual Basic for Applications wordt geopend.

2. Klik op Invoegen > Module, en plak de volgende macro in het modulevenster.

Sub ListMergedcells()
'updateby Extendoffice
Dim x As Range
Dim sMsg As String
sMsg = ""
For Each x In ActiveSheet.UsedRange
If x.MergeCells Then
If sMsg = "" Then
sMsg = "Merged cells:" & vbCr
End If
sMsg = sMsg & Replace(x.Address, "$", "") & vbCr
End If
Next
If sMsg = "" Then
sMsg = "No merged cells."
End If
MsgBox sMsg
End Sub

3. Druk op de F5-toets om deze macro uit te voeren, alle samengevoegde cellen worden weergegeven in een pop-up dialoogvenster. Zie screenshot:

vba code to list all merged cells