Bonjour à toutes et tous,

je travaille sur vba sur excel

voilà mon problème (ou plutot ma question parceque je ne sais meme pas si on peut faire ce que je vais vous demander!)

J'ai un bouton de commande dans lequel j'ai inseré une image (quand on va dans les propriétés du boutons)

lorsque je clique avec le bouton gauche de la souris, il affiche dans une cellule de la feuille et dans une cellule d'une autre feuille du classeur des infos liées au boutons (prix dans la première cellule et quantité dans l'autre cellule).

Je souhaiterais lorsque je clique droit (ou lorsque je pointe le bouton avec la souris?) qu'il m'affiche une image en grand sur un endroit de la feuille... est ce possible en se servant du clique droit?

En fait j'ai créé une sorte de petite caisse enregistreuse, et je souhaiterais afficher en grand les infos du produit, sans que cela ne soit porté en compte (comme c'est le cas lorsque on clique avec le bouton gauche...)

Est-ce possible? et si oui, pouvez- vous me dire avec quelle commande je dois travailler?

Merci d'avance pour votre aide!!

Un grand merci à tous les deux!!

(Et désolé d'avoir posté dans la mauvaise rubrique... j'ai vu débutant alors je me suis dit que ça devait être là! Au fait (je sais que ça va faire rigoler tout le monde, mais tant pis!) quelle est la différence entre vba et vb6?!

Pour en revenir à ma question, merci ManuAntibes c'est exactement ce que je voulais faire!!

J'ai juste encore un petit souci, l'image apparait aussi bien avec le click droit qu'avec le gauche, est-il possible de ne la faire apparaitre qu'avec le click droit? (je sais, je suis difficile!)

Encore un grand merci pour votre aide précieuse!

J'ai essayé de modifier "Button" par xlNoButton, xlPrimaryButton, xlSecondaryButton ou xlMiddleButton, comme proposé dans l'aide microsoft vba, mais ça ne change rien, il affiche l'image quel que soit le bouton sur lequel on clique... je dois certainement faire une erreur quelque part...

J'ai trouvé!

Il faut utiliser la commande "if then"!:

Private Sub CommandButton1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If Button = 2 Then Image1.Visible = True
If Button = 1 Then Image1.Visible = False
If Button = 4 Then Image1.Visible = False
End Sub

Private Sub CommandButton1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If Button = 2 Then Image1.Visible = False
If Button = 1 Then Image1.Visible = False
If Button = 4 Then Image1.Visible = False
End Sub


Le chiffre 2 correspond au boutton droit, le 1 au gauche et le 4 au boutton du centre

Merci à tous!

Ben oui! mais je débute! je fonctionne par essai-erreur!

Encore merci pour votre aide!

je risque de vous poser encore une multitude de question!

a propos, est-il possible (si j'ai bien compris la difference entre vba et vb6!) de transferer les macros créées dans excel (donc en vba) vers vb6 pour en faire un petit logiciel a part entière?

Merci beaucoup!