Commentaires et image

[canard]

salut a tous,

est il possible d'envoyer une image d'un userform dans un commentaire d'une cellule et réciproquement ?

Est il possible que l'image s'adapte a la taille du commentaire sans déformation, comme fmPictureSizeModeZoom dans le usf ?

Merci.

@+

Message édité par: canard, à: 28/10/2005 13:04

 

[Nikolaï]

Bonjour Canard

Essaye ça.
Range('A1').Comment.Shape.Fill.UserPicture 'H:\\Picture 003.jpg'

A plus
Christophe

 

[canard]

salut nikolaï, le forum

ça ne fonctionne pas, j'ai tourné le code dans tout les sens mais rien a faire.

Merci quand meme.
@+

 

[Nikolaï]

Qu'est-ce qui ne marche pas?

Créer une image dans un commentaire ou créer une image à partir de l'image d'un userform.

Christophe

 

[canard]

re,


je voudrais créé un commentaire a partir de l'image d'un userform.

Merci

 

[Nikolaï]

A mon avis tu ne peux pas parce qu'il ne saura pas ou prendre l'image.
Par contre si tu utilise userform1.picture loadpicture(H:\\toto.bmp'), ce que je ferais c'est qu'il y est une constant que tu gardes avec le path (H:\\toto.bmp') de l'image.
Et dans ce cas tu peux appeler le variable pour mettre cette meme image dans ton commentaire.

Bon weekend, je dois partir.
Christophe

 

[Nikolaï]

Bonjour

et voilà j'ai trouvé !

SavePicture UserForm1.Picture, UserForm1.Picture
Range('A1').Comment.Shape.Fill.UserPicture UserForm1.Picture

et cela devrait marcher...

Christophe