Empecher la saisie de certains caractere ds textbox

Visiblement, c'est simple :
Sur l'evenement Change
Tu fais un Mid$(Texte, 1,1) pour récupérer la lettre et tu testes
Puis avec un Mid$(Texte,2) tu vérifies que c'est un numérique (IsNumeric) et tu vérifies que sa valeur est entre 1 et 20.

Jai peut etre une idee ca serait de verifier avec un if si le texte de la textbox est different de la valeur des cellules d'une plage (dans laquelle jai inscrit un par un chacune des cases possibles)?

Technique interssante mais c impossible je dois le rendre dans moins de 2h et je ne peux reecrire tout le code avec les variables de ligne et de colonnes ca serait trop long, et je suis deja a bout de nerf x(
Je voudrais que ca renvoi une msgbox ("Erreur de saisie: cette case n'existe pas")

Jai tenté ca actuellement
If TextBox.Text <> ("A1:T20").Name then
msgbox ("erreur")
else
Suite du code...
Mais ca ne mache pas :(

http://www.bataillenavale-jeu-ifs.fr/jeu/
Voila notre site si vous souhaitez voir le code afin de mieux comprendre

Merci beaucoup Henry, vous m'avez permis de resoudre partiellement le probleme, jai reussi a m'en servir pour la lettre mais je ny suis pas parvenu pour le chiffre.
Je suis désolé de l'erreur que jai commise en creant un double sujet, je me doutais du resultat mais j'etais desesperé, je retiens la lecon

Jai declare Txt, Txt3 As Variant
(Avec Txt le contenu de la textbox en .Text)
Puis dans l'afterupdate de la textbox:

Txt3 = Mid(Txt, 2)
 If IsNumeric(Txt3) = False Or Txt3 > 20 Or Txt3 = 0 Then
    MsgBox ("Erreur de saisie, ce nombre n'existe pas sur le plateau")
     Exit Sub
                           Else
  End If

Et jai la msbox quoi que je mette apres la lettre.

EDIT : Ajout du LANGAGE dans les balises de code (la coloration syntaxique). Explications disponibles ici : ICI Merci d'y penser dans tes prochains messages.