Nombre de cellules fusionnées

[Eric M]

Bonjour,

Y a t-il un moyen en VBA de créer une fonction pour connaître le nombre de cellules fusionnées avec une autre.

Exemple : si A1 est fusionnée avec A2 et A3, je voudrais que ça me renvoie : "fonction(A1)=2"

Merci d'avance

 

[Minick]

Salut,

Tu peux faire comme cela

Function Fusion(Cellule As Range)
Fusion = Cellule.MergeArea.Count - 1
End Function

@+ Minick

 

[Eric M]

Merci!

 

[Eric M]

Désolé mais y a tout petit problème!

Si je fusionne A1, A2, A3 et que je rentre la fonction Fusion(A1) dans une cellule, ça m'affiche la bonne valeur (2). Mais si jamais je fusionne en plus A4
la valeur reste à 2 au lieu de passer à 3.

Y aurait-il pas moyen de faire un espèce de rafraîchissement?

Merci quand même, je tiens le bon bout.