bonjour le forum,sabV
MERCI pour tout vos conseilles et votre aide
si cela peut venir en aide
voila un essaie qui fonctionne très bien nombre de frappe 1
Private Sub TextBox2_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If Button = 1 Then TextBox2 = InputBox("quelle dose svp ?", "ATTENTION ?")
End Sub
avec tout mon respect et ma gratitude
a bientôt sur le forum