OVH Cloud OVH Cloud

image dans un userform ?

6 réponses
Avatar
Patrick
Salut,


J'ai crée un userform avec des boutons cliquables mais à la place du nom
j'aimerais mettre une image sur le bouton comment puis-je faire ?

Merci

6 réponses

Avatar
Jacques93
Bonsoir Patrick,

Tu peux le faire directement dans la fenêtre propriété du bouton en
renseignant sa propriété 'Picture', ou dans le code avec, par exemple

Me.CommndButton1.Picture = LoadPicture("NomDuFichier.bmp")

avec Office 2003, les .bmp .dib .jpg .ico .gif .wmf sont supportés.

Salut,


J'ai crée un userform avec des boutons cliquables mais à la place du nom
j'aimerais mettre une image sur le bouton comment puis-je faire ?

Merci





--
Cordialement,

Jacques.

Avatar
Jacques93
Re,

Tu as également la propriété PicturePostion pour positionner l'image,
et la propriété Caption que tu conserves ou pas, en fonction du cadrage
de l'image.

Bonsoir Patrick,

Tu peux le faire directement dans la fenêtre propriété du bouton en
renseignant sa propriété 'Picture', ou dans le code avec, par exemple

Me.CommndButton1.Picture = LoadPicture("NomDuFichier.bmp")

avec Office 2003, les .bmp .dib .jpg .ico .gif .wmf sont supportés.


Salut,


J'ai crée un userform avec des boutons cliquables mais à la place du
nom j'aimerais mettre une image sur le bouton comment puis-je faire ?

Merci







--
Cordialement,

Jacques.


Avatar
Oliv'
Jacques93 que je salut a écrit

Bonsoir Patrick,

Tu peux le faire directement dans la fenêtre propriété du bouton en
renseignant sa propriété 'Picture', ou dans le code avec, par exemple

Me.CommndButton1.Picture = LoadPicture("NomDuFichier.bmp")

avec Office 2003, les .bmp .dib .jpg .ico .gif .wmf sont supportés.




L'image est-elle stockée dans le fichier excel ou reste t'elle dans son
emplacement d'origine ???


--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
Pour me joindre : http://cerbermail.com/?V8r2o1YHl4
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Avatar
Jacques93
Bonjour Oliv'

Avec 'LoadPicture', l'image reste bien sûr à son emplacement d'origine
(heureusement), et n'est pas stockée dans le classeur. Pour stocker
plusieurs images dans le classeur (en les conservant également à leur
emplacement d'origine); tu peux positionner plusieurs contrôles Image
sur un UserForm (avec propriété Visible = False), et faire par exemple :

Withh Me.CommandButton1
Select Case <condition>
case 1
.Picture = me.Image1.Picture
Case 2
.Picture = Me.Image2.Picture
[...]
End Select
End With

Jacques93 que je salut a écrit


Bonsoir Patrick,

Tu peux le faire directement dans la fenêtre propriété du bouton en
renseignant sa propriété 'Picture', ou dans le code avec, par exemple

Me.CommndButton1.Picture = LoadPicture("NomDuFichier.bmp")

avec Office 2003, les .bmp .dib .jpg .ico .gif .wmf sont supportés.





L'image est-elle stockée dans le fichier excel ou reste t'elle dans son
emplacement d'origine ???





--
Cordialement,

Jacques.


Avatar
Oliv'
Merci beaucoup Jacques !!

Jacques93 que je salut a écrit dans

Bonjour Oliv'

Avec 'LoadPicture', l'image reste bien sûr à son emplacement d'origine
(heureusement), et n'est pas stockée dans le classeur. Pour stocker
plusieurs images dans le classeur (en les conservant également à leur
emplacement d'origine); tu peux positionner plusieurs contrôles Image
sur un UserForm (avec propriété Visible = False), et faire par
exemple :
Withh Me.CommandButton1
Select Case <condition>
case 1
.Picture = me.Image1.Picture
Case 2
.Picture = Me.Image2.Picture
[...]
End Select
End With

Jacques93 que je salut a écrit


Bonsoir Patrick,

Tu peux le faire directement dans la fenêtre propriété du bouton en
renseignant sa propriété 'Picture', ou dans le code avec, par
exemple Me.CommndButton1.Picture = LoadPicture("NomDuFichier.bmp")

avec Office 2003, les .bmp .dib .jpg .ico .gif .wmf sont supportés.





L'image est-elle stockée dans le fichier excel ou reste t'elle dans
son emplacement d'origine ???





Avatar
Jacques93
Bonjour Oliv,

De rien :-)

En complément, en fonction des versions d'Office, il est possible
d'utiliser le contrôle ImageList pour stocker des images :

Me.CommandButton1.Picture = Me.ImageList1.ListImages(1).Picture

http://msdn.microsoft.com/library/default.asp?url=/archive/en-us/dnaro97ta/html/msdn_ode2.asp


Merci beaucoup Jacques !!

Jacques93 que je salut a écrit dans


Bonjour Oliv'

Avec 'LoadPicture', l'image reste bien sûr à son emplacement d'origine
(heureusement), et n'est pas stockée dans le classeur. Pour stocker
plusieurs images dans le classeur (en les conservant également à leur
emplacement d'origine); tu peux positionner plusieurs contrôles Image
sur un UserForm (avec propriété Visible = False), et faire par
exemple :
Withh Me.CommandButton1
Select Case <condition>
case 1
.Picture = me.Image1.Picture
Case 2
.Picture = Me.Image2.Picture
[...]
End Select
End With




--
Cordialement,

Jacques.