Info bulle - passage souris vba

Babidi M -  
Bonjour,

Je voudrai qu'une info bulle apparaisse lorsque la souris se situe sur un bouton de commande..
Pourriez vous m'aidez s'il vous plait ? le langage de programmation est le VBA.

Merci d'avance

2 réponses

  1. Bibi
    Je pense avoir plus simple, mais je ne sais pas si c'est vrmt bon,
    Il suffit d'aller dans les propriétés des boutons de commande desquels tu veux faire apparaitre un msg, puis tu va dans "controle tiptext" je crois puis tu rentre le texte que tu veux faire apparaitre.
    1
    1. Jeremou
      Bonjour,

      Tu créés un controle ActiveX d'image (nom = Image), tu insères l'image que tu veux dedans et tu crées une forme normale (nom = infoimage) pour ton info-bulle avec le texte dedans, puis dans le code de ton controle ActiveX, tu mets ceci :

      Private Sub Image_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
      If X < 10 Or X > Image.Width - 10 Or Y < 10 Or Y > Image.Height - 10 Then
      ActiveSheet.Shapes("infoimage").Visible = False
      Else
      ActiveSheet.Shapes("infoimage").Visible = True
      End If
      End Sub

      Voila
      0