extraction de mots dans une phrase

[Jean-Claude]

j'ai une liste d'adresses comprenant dans la même case :
adresse 1, adresse 2, code postal, et ville.
je voudrais les séparer, ou au moins code postal et ville.
la fonction trouve(" ") peut-elle marcher en démarrant de la droite, et si oui comment ?
peut-on extraire plusieurs mots à la fois, en démarrant de gauche ou de droite ?
existe-t-il une fonction sachant repérer un chiffre parmi des lettres ? (là je rêve un peu !)

Merci d'avance

Jean-Claude

 

[arnaud]

Pour la fonction qui trouve un chiffre parmi les lettres rien de plus simple, tu fais une boucle qui regarde si chaque carractère est compris entre la 1er valeur asci des chiffres et la dernière.

pour la recherche et extraction de mot, le plus simple serai que tu est un carractère séparateur qui n'est jamais utilisé dans ton texte.

 

[andré]

Salut,

Pour séparer les chaînes de caractères regarde sous DONNEES / CONVERTIR

Pour extraire uniquement les chiffres d'une chaîne, je réfléchis.
Je ne vois pas à première vue, mais patience.

Ândré.

 

[arnaud]

par ex :

dim machaine as string

for i = 1 to len(machaine)

if mid(machaine,i,1) > Chr(47) and mid(machaine,i,1) < Chr(58) then
msgbox "chiffre détecter !!"
end if

next i

 

[Michel]

bonjour andré , arnaud et jean claude

tu trouveras ci joint une procedure qui extrait toutes les valeurs numeriques d'un texte

j'espere que cela pourra t'aider

bonne journée
Michel

 

[Jean-Claude]

Merci Arnaud pour ta fonction vba, mais je ne le maîtrise absolument pas
Aurais tu une fonction excel pour péquin de base ?
Merci d'avance
Jean-Claude

 

[arnaud]

je ne connai pas trop les fonction excel et de te faire une petite macro vba qui n'est pas si compliqué que ça t'offre beaucoup plus de possibilité et de souplesse.

 

[Jean-Claude]

Merci Michel, ta macro est géniale pour extraire les chiffres, mais j'aurais aimé une fonction qui me trouve un chiffre dans une suite de caractères et me ramène tout ce qui est à gauche ou à droite de ce chiffre.
@+
Jean-Claude

 

[Michel]

Rebonjour à tous

oouuppss , Désolé j’avais oublié de définir mes variables
j’ai corrigé mon erreur avant de me faire gronder par le prof … ;o)

jean claude , pour l’extraction de tous les mots ou chiffres d’une cellule , je t’enverrai un autre exemple ce soir ( le fichier est créé , mais à la maison ) . ce sera par vba car je ne connais pas de fonction pour répondre à ta demande

bonne journée
Michel

 

[Celeda]

Bonjour,

Veuillez me pardonner mon intrusion, Messieurs, mais je reste toujurs admirative quand je vois avec quelle aisance les macros peuvent travailler.

J'allais proposer modestement à JC d'aller jeter un oeil sur ce lien pour récupérer le classeur AFII dans lequel il y a la feuille Lien supprimé.

D'autres éventuelles solutions - à voir si on peut adapter en formules......


Celeda

 

[PhiBou]

Salut le fil, le Forum

Cette formule fonctionne à merveille (me rappelle plus de l'auteur... veuiller m'excuser)

=1*STXT(A1;EQUIV(0;(ESTERREUR(STXT(A1;LIGNE(INDIRECT("1:"&NBCAR(A1)));1)*1)*1);0);NBCAR(A1)-SOMME((ESTERREUR(STXT(A1;LIGNE(INDIRECT("1:"&NBCAR(A1)));1)*1)*1)))

A mettre sous forme matricielle (CTRL+MAJUSCULE+ENTREE)

NB : Il faut que la phrase (en A1) ne contienne qu'un seul nombre.

@+ PhiBou

 

[michel]

Rebonjour André , Arnaud , jean claude , Phibou et Celeda

Ci joint un exemple qui extrait tous les mots d'une cellule . les informations sont transférées sur la feuille2 .
pour le reste il faudra l'adapter à ton projet car tu auras certainement des nombre de mots différents pour chaque adresse ( donc des décalages de cellules ) , sans doute aussi des chiffres dans adresse1 et adresse2 , ce qui risque de ne pas faciliter la différenciation entre les parties adresse / code postal /ville

Si tu peux trouver ton bonheur par les formules comme cela est proposé par Phibou et Celeda , tu auras certainement de grands gains en temps de calcul , car mon exemple risque de ramer pour des listes importantes

Bonne soirée
Michel

 

[michel]

rebonsoir

...;o(....

avec le fichier ce sera mieux

bonne soirée
Michel

 

[Celeda]

Bonsoir,


à Extraire : SUPERMICHELSURXLD


Super !!!MICHEL!!!SUR!!XLD!!!

À notre tour de se retrouver au chomage les formulistes avec toutes ces macros qui catapultent les mots dans chaque cellule en un seul click!!
C'est pas juste !!







SUPER!!!!!!!!!!!Dans la database de XLD.

Celeda

 

[michel]

Bonjour Celeda

Merci , ton message est très gentil
tu es très indulgente avec moi car en revisionnant le fichier ce matin ,je ne suis pas très content de moi ( une fois de plus je me suis précipité pour envoyer mon exemple sans prendre le temps de me relire )

ci joint une version mise à jour

Celeda , je profite de ce post pour te feliciter , sans oublier Cathy et Monique , pour les trois nouveaux programmes en telechargement . ainsi que pour le classeur du mois de juin sur les doublons ( mon préféré ) .

bonne week end
Michel