A voir également:
- Excel info bulle passage souris
- Liste déroulante excel - Guide
- Info pc - Guide
- Word et excel gratuit - Guide
- Crystal disk info - Télécharger - Informations & Diagnostic
- Comment activer le pavé tactile sans souris - Guide
2 réponses
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.
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.
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
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