Extaction du cope postal et de la ville

Vilain

XLDnaute Accro

• 25 Mai 2012

• #2

Re : Extaction du cope postal et de la ville

Bonjour,

Il manque la pièce jointe

A plus

 

Vote positif 0 Vote négatif

G

Gudo

XLDnaute Junior

• 25 Mai 2012

• #3

Re : Extaction du cope postal et de la ville

Bonjour

Merci, la voila

 

Vote positif 0 Vote négatif

Vilain

XLDnaute Accro

• 25 Mai 2012

• #4

Re : Extaction du cope postal et de la ville

Re,

Je n'ai pas bien le temps de me pencher la dessus, mais en combinant les fonctions stxt et cherche, tu devrais pouvoir réussi (bien que les espaces dans le noms de la ville puissent être un problème.
Jette un oeil dans les discussions similaires que tu as en bas de cette page ou fais une recherche sur le forum.

a plus

 

Vote positif 0 Vote négatif

D

david84

XLDnaute Barbatruc

• 25 Mai 2012

• #5

Re : Extaction du cope postal et de la ville

Bonjour,
solutions issues du site de JB :
Adresse :

Code:

=GAUCHE(K3;NBCAR(K3)-EQUIV(VRAI;ESTNUM(--(STXT(K3;NBCAR(K3)-LIGNE($1:$255);1)));0)-5)

Code postal :

Code:

=STXT(K3;NBCAR(K3)-EQUIV(VRAI;ESTNUM(--(STXT(K3;NBCAR(K3)-LIGNE($1:$255);1)));0)-4;5)

Ville :

Code:

=MAJUSCULE(STXT(K3;NBCAR(K3)-EQUIV(VRAI;ESTNUM(--(STXT(K3;NBCAR(K3)-LIGNE($1:$255);1)));0)+2;99))

Formules matricielles à valider par Ctrl, Maj et entrée.
A+

 

Vote positif 0 Vote négatif

J

JHA

XLDnaute Barbatruc

• 25 Mai 2012

• #6

Re : Extaction du cope postal et de la ville

Bonjour à tous,

Pas sur que cela marche à tous les coups mais à essayer

Edit: Salut David84, bien vu, je me casse toujours la tête pour rien

JHA

 

Pièces jointes

• Exemple_Adresse.xlsm

  218.2 KB · Affichages: 86

Vote positif 0 Vote négatif

G

Gudo

XLDnaute Junior

• 25 Mai 2012

• #7

Re : Extaction du cope postal et de la ville

Bonjour David84

Super ! (Cà, je n’aurais pas arrivé à le faire tout seul !) 😛

Je viens de faire plusieurs essais imaginatifs
Pour l’instant cela semble fonctionner à 99%

Je ne l’ai pas encore essayé dans mon tableau
Mais je voulais déjà te remercier

Après j’essaierais de comprendre le principe
Là, cela risque d’être beaucoup plus difficile 😕

J’ai mis 99%
Car pour les majuscules, cela n’enlève pas les accents
« Vitré » devient « VITRÉ » 😡

 

Vote positif 0 Vote négatif

G

Gudo

XLDnaute Junior

• 25 Mai 2012

• #8

Re : Extaction du cope postal et de la ville

Bonjour JHA

Pas sur que cela marche à tous les coups

Cliquez pour agrandir...

Effectivement cela ne marche pas pas vraiment 🙁
Mais personnellement, j’étais encore loin de ce résultat !

Alors merci bien pour ton aide

Une question
A qui correspond "µ" dans ta formule 😕

A+

 

Vote positif 0 Vote négatif

ralph45

XLDnaute Impliqué

• 25 Mai 2012

• #9

Re : Extaction du cope postal et de la ville

Salut Gudo, Gillus69, david85 et JHA,

Pour supprimer les accents, une fonction personnalisée :

Code:

Function SANSACCENT(texte)
    'Définition des variables
    avec = "ÀÁÂÃÄÅàáâãäåÒÓÔÕÖØòóôõöøÈÉÊËèéêëÌÍÎÏìíîïÙÚÛÜùúûüÿÑñÇç_"
    sans = "AAAAAAaaaaaaOOOOOOooooooEEEEeeeeIIIIiiiiUUUUuuuuyNnCc "
    tmp = texte
    'Boucle de traitement
    For i = 1 To Len(tmp)
        pot = InStr(avec, Mid(tmp, i, 1))
        If pot > 0 Then Mid(tmp, i, 1) = Mid(sans, pot, 1)
    Next i
    If tmp = 0 Then tmp = ""  'Ne laisse pas un zéro si champ vide
    SANSACCENT = tmp          'Retour du traitement
End Function

A coller dans un module (Alt+F11)

Ensuite si la 1ère adresse est en C2, tu tapes la formule :
=SANSACCENT(C2)

A+

 

Dernière édition: 25 Mai 2012

Vote positif 0 Vote négatif

G

Gudo

XLDnaute Junior

• 25 Mai 2012

• #10

Re : Extaction du cope postal et de la ville

ReBonjour David84

Voilà c’est fait !

A quelques exceptions près
La récupération s’est passée sans problème
Et les seuls problèmes rencontrés étaient dus à des adresses mal rentrées ou différemment

Merci encore pour la solution 😱

Une dernière question :
Existe-il un moyen direct de transformer les « formules » en « texte »
Plutôt que de passer par un autre fichier tampon 😕

 

Vote positif 0 Vote négatif

D

david84

XLDnaute Barbatruc

• 25 Mai 2012

• #11

Re : Extaction du cope postal et de la ville

Re

Existe-il un moyen direct de transformer les « formules » en « texte »

Cliquez pour agrandir...

Le plus simple : sélectionner les résultats et faire un copier-collage spécial valeurs.
A+

 

Vote positif 0 Vote négatif

G

Gudo

XLDnaute Junior

• 25 Mai 2012

• #12

Re : Extaction du cope postal et de la ville

Bonsoir Ralph45

Merci pour ta macro

C’est exactement ce qu’il me fallait
Et je vois que tous les accents sont prix en compte 😎

 

Vote positif 0 Vote négatif

G

Gudo

XLDnaute Junior

• 25 Mai 2012

• #13

Re : Extaction du cope postal et de la ville

Re,

faire un copier-collage spécial valeurs

Cliquez pour agrandir...

Merci à nouveau David 84

Grâce à vous, mon tableau est maintenant impeccable et en ordre

Pour qu'il le reste ainsi

Existe t-il un moyen à (l'aide d'une macro peut-être) de forcer la saisie des villes en majuscules directement dans les cellules mêmes 😕😕

A+

 

Vote positif 0 Vote négatif