Bonjour à tous,
Voici le code que j'utilise:
...
If MsgBox("Le Numero est Incorrect !", vbInformation + vbOKOnly, "ATTENTION") = vbOKOnly Then
With Me.TextBox1
.SelStart = 0
.SelLength = Len(.Text)
.SetFocus
End With
End If
Exit Sub
...
Je n'arrive pas à avoir le focus sur la textbox et encore moins à selectionner le contenu !
pourquoi ???
Voici le code que j'utilise:
...
If MsgBox("Le Numero est Incorrect !", vbInformation + vbOKOnly, "ATTENTION") = vbOKOnly Then
With Me.TextBox1
.SelStart = 0
.SelLength = Len(.Text)
.SetFocus
End With
End If
Exit Sub
...
Je n'arrive pas à avoir le focus sur la textbox et encore moins à selectionner le contenu !
pourquoi ???