XL 2010 VBA fusion cellules identiques

[spike29]

Bonjour,

J'ai un code me permettant de mettre en forme une colonne, à savoir fusionner les cellules ayant le même contenu.
Il s'agit de la colonne B de ma Feuil1.

Une fois cette macro déclenchée et les différentes fusions réalisées en colonne B, je souhaiterai que la colonne E ( à partir de la ligne 26) reprenne la même mise en forme que la colonne B. Je souhaite donc qu'en colonne E il y ai les mêmes cellules de fusionnées qu'en colonne B.

Mon fichier en PJ.

Merci d'avance pour votre aide.

Bonne fin de journée

 

[sylvanu]

Bonjour Spike,
En utilisant l'enregistreur on trouve un code assez simple.

 

[sylvanu]

ou cent fois plus simple, dupliquer le merge de la colonne B :

        Application.DisplayAlerts = False
        Range("B" & LigneDeb & ":B" & i - 1).Merge
        Range("E" & LigneDeb & ":E" & i - 1).Merge
        Application.DisplayAlerts = True

 

[spike29]

Bonsoir et merci pour la réponse !

ça fonctionne parfaitement !

Bonne fin de journée