Macro pour splitter une adresse postale

[Creepy]

Bonjour,

Je dois transferer des données d'un fichier Excel vers une B de Données. Le hic c'est que j'ai une colonne adresse avec tout et n'importe quoi (Adresse Cp Ville, Adresse BP Ville cedex, etc ...).

le 2ème Hic c'est que dans la base de D il y a un champ adresse, adresse 1, code Postal, Ville, etc ...

Je ne peux pas convertir, car il n'y a pas de largeur fixe, ni de délimiteur spécifique.

J'ai 300 lignes à traiter. Si je splite les informations à la main (vive la saisie !!) ca va me prendre un certain temps. D'un autre coté, je ne suis pas sûr que le temps de dév une macro, la tester et l'appliquer me prenne moins de temps !!

Bref quelqu'un aurait-il un bout de code sous le coude, un lien, qui me permetrtait de gagner du temps. Même si je dois repasser quelques lignes à la main, c'est pas grave !

Merci d'avance

Creepy

 

[ODVJ]

Re : Macro pour splitter une adresse postale

Bonjour,

as-tu envisagé les expressions régulières?
ça peut te traiter une partie de tes lignes en localisant les codes postaux.

tu as un fichier à montrer?

A+

 

[Creepy]

Re : Macro pour splitter une adresse postale

Re,

Merci de ta réponse ODVJ.

Je ne connais pas les expressions régulières !

Ci joint un bout de fichier.

A+

Creepy

 

[Creepy]

Re : Macro pour splitter une adresse postale

Re All,

Merci José je m'en doutais ! Voila ce que c'est de faire tout dans la précipitation et de ne pas borner dès le départ !

Après il faut pas se plaindre que les utilisateurs saisissent n'importe quoi.

Bon allez au boulot !!

A+

Creepy

 

[Hervé]

Re : Macro pour splitter une adresse postale

bonjour tout le monde

une petite proposition, pour peut etre te permettre d'extraire les CP, villes et BP.

tres loin d'etre parfait.

renvoi en feuille 2

salut

 

[ODVJ]

Re : Macro pour splitter une adresse postale

Bonfjour à tous,

voivi un exemple à partir des Regex de la macro complémentaire Morefunc.
il est possible de l'affiner pour les boîtes postales.

A+