XL 2016 VBA Fusion de cellules

[tall56]

Bonjour,
j'aimerai faire un fichier excel avec dans un tableau divers données type BDD mais j'aimerai également pour facilité la lecture de l'utilisateur et donc avec 2 macro et 2 bouton.
En sélectionnant les colonnes ou non pouvoir fusionner les valeurs en double qui sont proches.
et le deuxième bouton pour défusionner tout pour pouvoir faire des modifs.

J'ai essayé différentes macro trouvé sur un internet mais rien ne fonctionne.

Si un connaisseur en VBA pouvait m'aider.
Merci.

 

[chris]

Bonjour
la fusion de cellules est une plaie qui limite l'utilisation d'Excel (difficulté à sélectionner, copier, trier, filtrer...)

Il est conseillé de masquer la répétition des valeurs par MFC, ce qui apporte le même confort de lecture sans les inconvénients de la fusion.

ou en colorant en + en blanc

 

[tall56]

Ah oui super approche, j'y avais pas pensé.

Peux tu me dire qu'elle formule as tu appliqué s'il te plait ?

Merci.

 

[chris]

RE

 

[job75]

Bonjour tall56, chris,

La fusion de cellules ne pose pas de vrais problèmes mais le tableau ne doit pas être structuré.

Voyez le fichier joint et cette macro dans le code de la feuille :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim r As Range
If Target.MergeCells Then
    Cancel = True
    Set r = Target(1).MergeArea
    Target.UnMerge 'défusionne
    r = Target(1)
    r.Borders.Weight = xlThin 'bordures (facultatives)
    r(1).Select
Else
    Application.DisplayAlerts = False
    Set r = Target(1)
    While r(2) <> "" And r(2) = Target(1) And Not r(2).MergeCells
        Cancel = True
        Set r = r(2)
    Wend
    If Cancel Then Range(Target, r).Select: Selection.Merge 'fusionne
End If
End Sub

Le double-clic recherche les cellules identiques sous la cellule cliquée et les fusionne.

Le double-clic sur une cellule fusionnée la défusionne.

A+

 

[chris]

RE

Tout dépend de ce que qu'on appelle de vrais problèmes...

J'ai passé un trajet entier de train (45mn) debout au-dessus d'une personne qui à passé tout ce temps à défusionner, insérer une ligne, refusionner n fois sur son tableau... et n'avais manifestement pas fini à l'arrivée... que de temps perdu inutilement...

Perdre tous les avantages des tableaux structurés, ne pouvoir ni trier ni filtrer sans passer par du code...

 

[tall56]

Merci pour vos réponses, les 2 solutions ont leurs avantages et leurs inconvénients. Je vais garder vos 2 méthodes elles me serviront forcément à l'avenir.