Discussion :

[jeremiegrenoble]

Bonjour,
J'aimerais savoir s'il existe une fonction ou si qqun a du code tout fait pour repérer une chaine de caractères formatée (par exemple une date : XX.XX.XX) dans du texte.
Merci

[ouskel'n'or]

Regarde Like, dans l'aide. Je ne sais pas si ça règlera ton pb mais sinon je ne vois pas.

A+

Edit
Avec Like, tu peux utiliser des ? pour comparer des formats: (Extrait de l'aide)
MyCheck = "BAT123khg" Like "B?T*" ' Renvoie True.
MyCheck = "CAT123khg" Like "B?T*" ' Renvoie False.
On peut en déduire que
MaDate = "12/10/05" like "??/??/??" 'Renvoie True

[ouskel'n'or]

Encore moi.
Une fois que tu sais si une date existe, tu peux tester sa position avec instr(Variable,"/") et de nouveau vérifier s'il s'agit bien d'une partie de date avec like.

Code :

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

EstDate = mid(Variable, instr(Variable,"/")-2,8)  like "??/??/??"

Et si EstDate = true, tu récupère la date. Mais là je pense que tu sauras te débrouiller...

Et si quelqu'un a une meilleure solution, je suis toujours ravi d'apprendre...

A+

[jeremiegrenoble]

Merci
je vais sûrement pouvoir faire quelque chose avec ça.
Mon pb c'est que les dates peuvent être en format XX.XX.XX ou XX XX XX

Dans tes instructions, le ? peut représenter n'importe quel caractère ?

[ouskel'n'or]

Dans tes instructions, le ? peut représenter n'importe quel caractère ?

Oui ! Mais si les séparateurs de date sont des espaces, là, tu as un problème... Imagine la phrase "Tu as un problème", EstDate = true sur "Tu as un"... et c'est pas bon du tout
Il te faudra un autre test avec gestion d'erreur sur "Cdate(LaDate)" où "LaDate" pourra être "Tu as un" dans l'exemple...

Tu vois...

A+

[jeremiegrenoble]

L'idéal serait que le ? représente un chiffre.
Il n'y pas un moyen de lui dire "je veux un format avec 2 chiffres, un espace (ou un point), 2 chiffres, espace, 2 chiffres ?

J'ai pas bien compris ce que tu veux dire par gestion d'erreur CDate, etc...

Et si je fais un test sur ma chaine de ?? ?? ?? ou ??.??.?? pour savoir si c une date ? c ça que tu voulais dire ?

[SilkyRoad]

bonjour

en complément de la réponse donnée par Ouskel'n'or , tu peux tester

Code :

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

If Chaine Like "*## ## ##*" Or Chaine Like "*##.##.##*" Then

bon apres midi
michel

[jmfmarques]

If Chaine Like "*## ## ##*" Or Chaine Like "*##.##.##*" Then

ou

If Chaine Like "*##? ##? ##*" Then