Public Sub SelectionTout(MonControl As Control) With MonControl .SetFocus .SelStart = 0 .SelLength = Len(MonControl) End With End Sub ' Pour Utiliser cette fonction, utilisez ce code dans un Bouton_Click par exemple : Call SelectionTout(Text1)
Télécharger le zip
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte
1 874 813 membres 35 nouveaux aujourd'hui 16 152 membres club