Vba excel textbox forcer la première lettre

Fermé
tm - 25 oct. 2011 à 09:38
Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 - 25 oct. 2011 à 11:51
Bonjour,

débutant en vba excel j'ai pu faire quelques recherches concernant le problème que je rencontre mais je n'ai pas trouvé de réponse "concrète" ...

J'ai trouvé dans les discussions du forum comment forcer une première lettre bien précise dans un textbox.

Mais dans mon cas j'aimerais pouvoir forcer seulement le premier caractère pouvant être n'importe quelle lettre de l'alphabet et ensuite forcer le format numérique (ca j'ai déjà trouvé) ! Comment puis-je faire ?

Merci d'avance pour votre aide !

crdlmt,

tm
A voir également:

1 réponse

Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 288
25 oct. 2011 à 11:51
Bonjour,
tu pourrais utiliser l'opérateur like pour contrôler la première entrée
et ensuite faire un test sur la longueur de la chaine

Sub test()

Dim MaVariable As String
Dim TestVF As Boolean
MaVariable = "E"
If Len(MaVariable) > 1 Then ' test la longueur de la chaine


Else
TestVF = MaVariable Like "[A-F]" ' Renvoie true

TestVF = MaVariable Like "[A-D]" ' Renvoie false
End If

End Sub
0