Different d'un texte

bonjour a tous

2 nouveaux problemes se posent a moi :

- je voudrais savoir comment on fait pour traduire 'different de' quand il s'agit d'une valeur sous forme de texte ?

exemple : if [valeur de ma cellule] different de "bonjour" then .....

ca marche pas avec <>

ensuite , j'ai crée une textbox a remplir ,dont la valeur ne doit etre que sous la forme '4 chiffres et la lettre A ' ou '4 chiffres et la lettre B'

exemple : 1111A ou 1234B ou 2256A etc etc etc

j'ai trouvé ca :

If TextBox1.Value = Format(TextBox1.Value, "####" & "a") Or TextBox1.Value = Format(TextBox1.Value, "####"&"b")Then MsgBox "c'est bon" Else MsgBox "faux": Exit Sub

mais ca considere que la valeur est bonne meme si elle ne comporte pas 4 chiffres ou que la lettre n'est ni A ni B

(en gros , ca marque que c'est bon si je tape 12C ,alors que ca ne l'est pas )

des idées?

Bonjour

A essayer

If Me.TextBox1 Like "####[A-B]" Then
  Range("A1") = "Bon"
Else
  Range("A1") = "Faux"
End If

Bonne soirée

apparemment ca marche pas

en fait ,c'est pas grave pour si la lettre n'est pas un A ou un B ,mais il faudrait absolument que ce soit sous la forme '4 chiffre et 1 lettre

pas de 111D ou 1GJKI ou 2134AAAA

personne n'a d'idée?

Bonsoir

A voir

c'est la meme chose que ce que tu disais plus haut on dirait

mais ca marche toujours pas

si je tape 1111A ca marque :faux

pourtant 1111A est bien sous la forme '4chiffres et 1 lettre'

Bonsoir

Un problème parce que .....

Si quelqu'un peut tester

Merci

Bonjour,

cacolac a écrit :

si je tape 1111A ca marque :faux

pourtant 1111A est bien sous la forme '4chiffres et 1 lettre'

Tu avais peut-être mis le "a" en minuscule ...

Essaie avec :

If Me.TextBox1 Like "####[a-z,A-Z]" Then
     Range("A1") = "Bon"
Else
     Range("A1") = "Faux"
End If

Cordialement,

effectivement , j'avais mis une minuscule

ca marche niquel

merci beaucoup