Cellulles fusionnées : comment les détecter ?

Bonjour à tous.

La présence de cellules fusionnées dans un tableau m'empêche de trier certaines colonnes.

Mais comment retrouver automatiquement ces cellules fusionnées ? (autrement que visuellement, ce qui n'est pas très commode dans un tableau qui compte plusieurs milliers de lignes !).

Merci pour vos réponses (immédiates ! je n'en reviens pas) à ma question précédente.

hello

menu édition rechercher options format

trouve la case "fusionné" et valide

Bonjour,

pour les réponses qui t'ont été apportées dans l'autre fil, il vaut mieux répondre sur le même fil....

Avec ce code, tu sélectionnes toutes les cellules fusionnées de ton champ déterminé dans la définition de Rg

Puis tu peux les défusionnées par la commande : Rg1.MergeCells = False

Sub recherche_fusion()
Dim Rg As Range, Rg1 As Range
Set Rg = Range("A1:G500")
For Each cel In Rg
    If cel.MergeCells Then
        If Rg1 Is Nothing Then
            Set Rg1 = cel.MergeArea
        Else
            Set Rg1 = Union(Rg1, cel)
        End If
    End If
Next cel
Rg1.Select
Rg1.MergeCells = False
Set Rg = Nothing: Set Rg1 = Nothing
End Sub

Salut à tous,

+ simple, tu sélectionne toute la feuille (en haut à gauche) et :

Format/cellule/Alignement

tu décoche "fusionner cellules" (qui est certainement en grisé)

amicalement

Claude.

Merci pour vos réponses.

Elles vont me faire gagner beaucoup de temps.

Je devrais quand même me décider à en perdre un peu pour mieux connaître Excel...

J.