Vba excel textbox forcer la première lettre

tm -  
Bidouilleu_R Messages postés 1209 Statut Membre -
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

1 réponse

  1. Bidouilleu_R Messages postés 1209 Statut Membre 296
     
    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