Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2021 Commentaire au survol d'un checkbox d'un userform

Nicolas JACQUIN

XLDnaute Impliqué
Supporter XLD
Bonjour à tous,

Comme le titre le dit, je cherche à mettre un commentaire ou note au survol d'un checkbox d'un userform,
je sais que ça se fait et qui en a qui savent faire, mais plus moyen de trouver.

Merci d'avance à tous
 
Solution
Bonjour tous le monde,
J'ai trouvé ma solution je pense

Dans un module

VB:
Public Const MyString1 = "Les 1"
Public Const MyString2 = "Les 2"
Public Const MyString3 = "Les 3"
Public Const MyString4 = "Les 4"

Et dans le userform

Code:
Private Sub CheckBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    commentary CheckBox1, vbCrLf & MyString1
End Sub

Private Sub CheckBox2_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    commentary CheckBox2, vbCrLf & MyString2
End Sub

Private Sub CheckBox3_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
    commentary CheckBox3, vbCrLf & MyString3...

patricktoulon

XLDnaute Barbatruc
re
je crois qu a trop vouloir contourner certain event de manière brutale comme tu le fait tu a tordu ton excel
a grand coup de code fulgurants avec les api joyeuses
le pauvre ton pc il a envie de te dire (prend toi un boulier va )
 

patricktoulon

XLDnaute Barbatruc
re
oui mais ce n'est pas normal que ça fasse ça chez toi
faudrait se poser des questions
surtout que la tu le vois c'est pas du code compliqué et juste l'api du cursor
si un truc aussi simple déraille qu'est ce qu'il doit se passer sur des codes plus complexes
c'est pour toi que je le dit et c'est pas la première
ca viens peut être de la ta facon de coder des action en passerelle comme ça

Nicolas sur mon 2016 64 ça marche aussi
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…