Comment identifier et sélectionner toutes les cellules fusionnées dans Excel ?

Savez-vous comment rechercher et sélectionner toutes les cellules fusionnées dans Excel ? Découvrez trois méthodes astucieuses pour identifier et sélectionner rapidement l’ensemble des cellules fusionnées dans une plage ou une sélection sous Excel.

Identifier et sélectionner tous les Fusionné avec la commande Rechercher

Sélectionner et compter rapidement tous les Fusionné avec Kutools pour Excel

Identifier tous les Fusionné avec du code VBA

Identifier et sélectionner tous les Fusionné avec la commande Rechercher

Vous pouvez identifier et sélectionner tous les Fusionné dans la feuille active à l’aide de la commande Rechercherselon les étapes suivantes :

1. Cliquez sur l’onglet Accueil > Rechercher et sélectionner > Rechercher pour ouvrir la boîte de dialogue Rechercher et remplacer. Vous pouvez également ouvrir la boîte de dialogue Rechercher et remplacer en appuyant sur les touches Ctrl + F.

2. Cliquez sur le bouton Formatdans la boîte de dialogue. (Si vous ne trouvez pas le bouton)Format, cliquez sur le bouton Options pour développer la boîte de dialogue.) Voir la capture d’écran :

3. Dans la boîte de dialogue qui s’ouvre, Format de recherche, cochez uniquement l’option Cellules fusionnées dans la section Contrôle du texte sous l’onglet Alignement, puis cliquez sur OK.

4. Vous revenez maintenant à la boîte de dialogue Rechercher et remplacer. Cliquez sur le bouton Rechercher tout. Tous les éléments fusionnés s’affichent en bas de cette boîte de dialogue. Sélectionnez-les tous en maintenant la touche Maj.

Toutes les feuilles de calcul fusionnées sont désormais sélectionnées automatiquement lorsque vous sélectionnez tous les résultats. Voir la capture d’écran :

Conseil : Si vous souhaitez uniquement identifier, rechercher et sélectionner les cellules fusionnées dans une sélection, commencez par sélectionner la plage concernée.

Sélectionner et compter toutes les Fusionné avec Kutools pour Excel

Kutools pour Excel’s Sélectionner les cellules fusionnées vous permet d’identifier, de rechercher et de sélectionner toutes les cellules fusionnées dans une sélection en un seul clic.

Après avoir installé Kutools pour Excel, procédez comme suit : ()Téléchargement gratuit de Kutools pour Excel dès maintenant !)

1. Sélectionnez la plage de données dans laquelle vous souhaitez sélectionner les cellules fusionnées.

2. Cliquez sur Kutools > Sélectionner > Sélectionner les cellules fusionnées, voir la capture d’écran :

3. Tous les Fusionné de la sélection ont été sélectionnés d’un seul coup, et leur nombre a également été comptabilisé. Voir la capture d’écran :

Identifier toutes les Fusionné avec un code VBA

Code VBA 1 : identifier et mettre en évidence toutes les Fusionné

1. Maintenez enfoncées les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur Insertion > Module, puis collez la macro suivante dans la fenêtre Module.

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. Appuyez sur la touche F5 pour exécuter cette macro. Toutes les cellules fusionnées de la feuille active sont identifiées et mises en évidence. Voir la capture d’écran :

Code VBA 2 : identifier et lister toutes les Fusionné

1. Maintenez les touches Alt + F11, ce qui ouvre la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur Insertion>Module, puis collez la macro suivante dans la fenêtre Module.

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. Appuyez sur la touche F5 pour exécuter cette macro. Toutes les feuilles fusionnées sont listées dans une boîte de dialogue qui s’ouvre. Voir la capture d’écran :

Articles associés