Discussion :

[Vincent32]

Bonjour,

Je souhaite vérifier le format d'une cellule :

LL-CL-CC-L-CC-C-LL

où L représente une lettre et C un chiffre. J'ai surtout besoin de vérifier la présence des tirets et le nombre de caractères entre 2 tirets

Comment s'assurer du bon format de la cellule ?

Merci par avance de votre aide

[Jean-Philippe André]

Salut,

je propose les expressions rationnelles:
http://cafeine.developpez.com/access/tutoriel/regexp/

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub piou()
Dim reg As VBScript_RegExp_55.RegExp
Set reg = New RegExp
reg.Pattern = "[a-z][a-z]-[0-9][a-z]-[a-z]-[0-9][0-9]-[0-9]-[a-z][a-z]"
MsgBox reg.Test("ab-00-d-12-1-as")
MsgBox reg.Test("ab-0a-d-12-1-as")
End Sub

[Theze]

Bonjour,

Bien vu Jean-Philippe

Vincent, pour que ça corresponde à ton code (lettres en majuscules et à partir du code de Jean-Philippe) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
reg.Pattern = "[A-Z][A-Z]-[0-9][A-Z]-[0-9][0-9]-[A-Z]-[0-9][0-9]-[0-9]-[A-Z][A-Z]"

Hervé.

[Vincent32]

Merci beaucoup à tous les 2 c'est super je ne connaissais pas du tout

encore merci

bonne soirée