Vba excel textbox forcer la première lettre

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. 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