Controle sur une colonne de mon fichier Excel

[Anet]

Bonjour tout le monde,

Je dois écrire un macro qui va controler si toutes les cellules de ma colonne A sont de la forme XXXX-XXX-XXX-XXX-XXXXXXXXXXXXXXXXXXXXXX. Les X peuvent être des chiffres ou des lettres.

 

[Abel]

Bonjour Anet,

Ne multiplie pas les messages pour le même sujet.

Tu vas finir par te faire vilipender.

Soit sûre que quelqu'un regarde ton problème et laisse nous le temps de répondre.

De même, un sujet du type "Urgent", aura, sur ce forum, un effet plutôt inverse à ce que tu recherches.

En attendant ta réponse, lis la charte.

En attendant, pour ton problème, fait une recherche sur ce forum sur les sujet "Contrôle de format" ou "format de cellule".
Il me semble avoir vu passer des sujets équivalent au tien.

Bon courage.

Abel

 

[Jean-Marie]

Bonjour

Sub Anet()
Dim vDonnees As Long

vDonnees = Evaluate("=COUNTIF(Feuil1!A:A,""????-???-???-???-??????????????????????"")")
If vDonnees = Worksheets("Feuil1").Range("A65536").End(xlUp).Row Then
MsgBox "Toute les données sont conformes"
Else
MsgBox "Des données ne correspodent pas, que dois-je faire"
End If
End Sub

@+Jean-Marie

 

[Anet]

En effet peut être que ça va paraître trop con mais j'ai répété mon message comme dans le premier j'avais oublié de remercier et de dire bonne journée. Donc en relisant mon message j'ai trouvé ça trop impoli donc j'ai voulu recommencer...

Voilà voilà...

Désolée

Anet

 

[Jean-Marie]

re...

Il y a aussi la possibilité de faire ressortir les lignes avec une Mise en Forme Conditionnelle. Cela dépendant de ton but.

@+Jean-Marie

 

[Abel]

Re,

Pas de problème, Anet.

De plus, tu vois, il y a une réponse. Et une bonne.

Bonne journée.

Abel

 

[Anet]

Merci beaucoup,

Ca a été très utile

Bonne journée

Anet