comment recuperer la taille d'une cellule fusionnée?

[jf27]

bjr le forum !

je veux copier une image dans une cellule fusionner

le

selection.shaperange.widht=activecell.width

prend la taille de la 1ère cellule fusionnée et non la taille de la cellule fusionnée finale.

Comment puis je recuperer cette taille ?

Merci à tous
@+
JF27

 

[Pierrot93]

Re : comment recuperer la taille d'une cellule fusionnée?

Bonjour jf27

essaye en remplacant :

ActiveCell.Width

par :

ActiveCell.MergeArea.Width

bonne fin d'après midi
@+

 

[Guest]

Re : comment recuperer la taille d'une cellule fusionnée?

Bonjour JF,

ActiveCell.MergeArea.Width

A+

[Edit] Salut Pierrot😀

 

[jf27]

Re : comment recuperer la taille d'une cellule fusionnée?

salut Pierrot93, HASCO

C'est tellement simple quand on a la réponse !😉

le code final pour copier une image d'un usf dans une cellule mergée en adaptant la taille de l'image à la taille de la cellule mergée

Merci à vous🙂
@+

selection.shaperange.Lockaspectratio=msofalse
selection.shaprange.height=activecell.mergearea.Height
'etc