apparition et disparition d'une image sur un userform

apparition et disparition d'une image sur un userform - VB/VBA/VBS - Programmation

Marsh Posté le 28-05-2005 à 11:21:54    

Bonjour,
 
J'arrive à faire apparaitre un userform de visualisation d'une ligne Excel.
Mais je voudrais que si le paramètre "A" est écrit dans une cellule, une image bien spécifique apparaisse dans le userform. Et tout ceci pour x paramètre.
Peut-on effectuer ce genre de chose ???
 
si vous avez des idées...[email]
 
merci d'avance !

Reply

Marsh Posté le 28-05-2005 à 11:21:54   

Reply

Marsh Posté le 30-05-2005 à 16:50:33    

tu fais:
if cells(laligne, lacolonne) = A
   'j affiche l amage A
else if cells(laligne, lacolonne) = B

Reply

Marsh Posté le 30-05-2005 à 16:51:38    

excuse, j ai posté sans le vouloir....
 
tu fais:
if cells(laligne, lacolonne) = A
   'j affiche l amage A
else if cells(laligne, lacolonne) = B
    'j affiche l'image B
else if ....
 
endif

Reply

Marsh Posté le 30-05-2005 à 22:16:36    

merci pour ta réponse mais:
comment tu écris "j'affiche l'image x" ? et  
où écris-tu ce code ?
merci

Reply

Marsh Posté le 08-06-2005 à 11:40:31    

je ne sais pas comment afficher une image mais ca doit être sur des cours de VB donc tu peux aller voir!
Ce code tu l'écris dans une macro!
Et pour avoir l'affichage de ces images, tu lances ta macro!

Reply

Marsh Posté le 08-06-2005 à 12:01:11    

Pour afficher une image utilise un userform.
Dans la boite à outils userform prend le cadre pour insérer une image, ensuite dans la fenêtre propriété va chercher une image en cliquant sur "aucun" qui se trouve à côté de picture, ainsi tu insères une image à partir d'un fichier.
 
A ce niveau tu as une image dans le userform (répete l'opération pour les autres userform)
 
Pour faire apparaitre l'image maintenant, dans un bouton écrit ce code:
 
Private Sub CommandButton1_Click()
 
If Range("A1" ).Value = "A" Then
UserForm1.Show
ElseIf Range("A1" ).Value = "B" Then
UserForm2.Show
End If
 
End Sub
 
 
En cliquant sur le bouton tu fais apparaître le userform affecté à la lettre correspondante.
 
Dis moi si c'est ok.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed