[VBA] comment vérifier le type de données

zenon Messages postés 726 Date d'inscription   Statut Membre Dernière intervention   -  
zenon Messages postés 726 Date d'inscription   Statut Membre Dernière intervention   -
Bonsoir,

En essayant de répondre à une question, je me rends compte que je n'arrive pas à trouver comment vérifier le caractère numérique d'une chaîne de caractères...

J'essayais de décomposer un champ de type:

"Avenue des Fleurs, 33 75000 Paris" en 3 champs en me basant sur la recherche du code postal toujours composé de 5 chiffres consécutifs...

Merci
A voir également:

2 réponses

Réponse 1 / 2
JvDo Messages postés 1978 Date d'inscription   Statut Membre Dernière intervention   859
 
bonsoir,

j'utilise les regex de Laurent Longre que tu trouves dans sa macro complémentaire Morefunc :
pour obtenir la 1ère partie : 
=GAUCHE(A1;REGEX.TROUVE(A1;"\s\d\d(\s)*\d\d\d\s"))
pour le code postal :
=REGEX.STXT(A1;"\s\d\d(\s)*\d\d\d\s")

pour la fin :
=DROITE(A1;NBCAR(A1)-REGEX.TROUVE(A1;"\s\d\d(\s)*\d\d\d\s")-NBCAR(REGEX.STXT(A1;"\s\d\d(\s)*\d\d\d\s"))+1)
A+
1
Réponse 2 / 2
zenon Messages postés 726 Date d'inscription   Statut Membre Dernière intervention   180
 
Merci pour ta réponse.

Je suis ss access et je ne sais pas comment la transposer...

J'ai fini par trouver une astuce:

une boucle for qui recherche une suite de 5 chiffres avec des critères "maison" biscornus: nombre entre 1 et 99999; pas de " " derrière len()=5

C'est pas très clean mais ça fonctionne...
0

Discussions similaires

Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
Erreur d'exécution '13': Incompatibilité de Type
SLM-BHY -
Heliotte -

8 réponses
erreur 13 incompatibilité de type VBA excel
monalisach -
monalisach -

2 réponses
Erreur exécution 13 : incompatibilité de type
Belinos -
yg_be -

9 réponses