Discussion :

[totor92290]

Bonjour à tous,

Je sais que ce sujet a été traité mais je ne trouve pas ce que je veux!

J'ai un bouton "Command1"
Je souhaiterais qu'au passage de la souris un texte apparaisse (type aide) et que lorsque la souris quitte la zone du bouton, le texte disparaisse.

J'ai essayé ça sur On Mouse Move" sur la propriété du bouton:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
DoCmd.OpenForm "FXX_RepairReferenceExplanation"
DoCmd.Close "FXX_RepairReferenceExplanation"
End Sub

J'ai éssayé sans la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

DoCmd.Close "FXX_RepairReferenceExplanation"

Mais rien n'y fait.

En même temps si je pouvais éviter l'ouverture du formulaire et juste avoir une zone de texte, s'a m'arrangerait!!!

Si vous avez une solution je suis preneur!!

Merci

[tee_grandbois]

Bonjour,

En même temps si je pouvais éviter l'ouverture du formulaire et juste avoir une zone de texte, s'a m'arrangerait!!!

C'est pourtant ce que tu demandes à ce code de faire, il ne faut pas non plus lui en vouloir !
En fait il y a beaucoup plus simple : avec la propriété Texte d'info-bulle (dans l'onglet Autres) qui fait ce que tu demandes et sans passer par VBA, il suffit de mettre le texte que tu souhaites voir apparaitre.

[totor92290]

Merci à tous les deux!!

En effet c'est simple.

Petite question: peut-on modifier la police?

Merci

[tee_grandbois]

Merci à tous les deux!!

Nous ne sommes qu'un (sauf si un forumeur a posté en même temps et ensuite a supprimé son message, cela m'arrive aussi)
pour la police, c'est non, la seule fantaisie ici c'est la majuscule ...

[totor92290]

Merci tee grandbois,

En effet vous n'êtes qu'1!!
J'ai testé "l'info bulle" et en effet il y a un temps de latence... et la police est trop petite!
L'objectif c'est que ça "claque" aux yeux des utilisateurs... je vais sans doute utiliser l'ouverture d'un formulaire!!!

Aurais-tu une idée:
Passage de la souris : ouverture du formulaire
Sortie de la souris de la zone du bouton: fermeture du formulaire.

C'est faisable ça?

[tee_grandbois]

c'est faisable mais je ne te conseille pas trop de le faire, surtout sur le déplacement de la souris et le temps de latence est encore plus grand pour ouvrir, charger et fermer un formulaire.
Par contre pour l'info-bulle, tu as la possibilité de le rendre un peu plus voyant, comme tu as 255 caractères à ta disposition, tu peux créer un encadré et insérer des sauts de ligne soit par copier/coller du caractère (vbCrLf ne fonctionnera pas directement), soit par VBA comme dans l'exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Form_Load()
 
Me.Observations.ControlTipText = "************************************************************************" & vbCrLf & _
                                 "*  OUVERTURE DU FORMULAIRE FXX_RepairReferenceExplanation    *" & vbCrLf & _
                                 "************************************************************************"
 
End Sub

et voici le résultat :

[totor92290]

C'est TOP!!

Bon ok temps de latence... mais c'est TOP

Merci à tous les deux