Ne rentrer que des lettres dans un textbox

Bonjour,

J'ai un textbox et je voudrais pouvoir ni rentrer que des lettres, pas des valeurs numérique.

Merci

Re-,

avec ce code, on ne peut rentrer que des lettres (soit en minuscule, soit en majuscule)

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii >= 65 And KeyAscii <= 90 Or KeyAscii >= 97 And KeyAscii <= 122 Then
    KeyAscii = KeyAscii
Else
    KeyAscii = 0
End If
End Sub

Si c'est dans un userform, double clic sur l'usf, et colle le code

si c'est un textbox issu de la boîte à outils "Contrôles", clic droit sur le nom de l'onglet, "Visualiser le code", et colle le code.

J'ai trouvé!!!

Private Sub ZoneDeSaisie_Change()

If Me.ZoneDeSaisie <> "" And IsNumeric(Me.ZoneDeSaisie) Then
    MsgBox "Veuillez ne rentrer que des lettres."
    If Len(Me.ZoneDeSaisie) > 1 Then
        Me.ZoneDeSaisie.Value = Left(Me.ZoneDeSaisie, Len(Me.ZoneDeSaisie) - 1)
    Else
        Me.ZoneDeSaisie.Value = ""
    End If
End If

End Sub

[/code]

Re-,

tiens, il me dit quelque chose ce code.....

Par contre, on peut rentrer " ( è ç & - + ................

et oui c'est toi qui avait répondu félix!