XL 2019 separation d'une colonne en deux numéro et rue

Gardien de phare

XLDnaute Accro

• 25 Juillet 2022

• #2

Bonjour,
En supposant que la partie numéro de voie soit toujours séparée du nom de voie par un espace... On peut faire ça par formule

Pour obtenir le numéro de voie

VB:

= GAUCHE([@[Nouvelle adresse]];CHERCHE(" ";[@[Nouvelle adresse]];1))

Pour le nom de voie

Code:

=STXT([@[Nouvelle adresse]];CHERCHE(" ";[@[Nouvelle adresse]];1)+1;NBCAR([@[Nouvelle adresse]])-NBCAR([@[Numero de voie]])+1)

Edit, formule à perfectionner pour traiter le cas où il n'y a pas de numéro dans la voie

 

Dernière édition: 25 Juillet 2022

Vote positif 0 Vote négatif

VAGUE641

XLDnaute Occasionnel

• 25 Juillet 2022

• #3

Merci mais je l'utilise comment ?

 

Vote positif 0 Vote négatif

Gardien de phare

XLDnaute Accro

• 25 Juillet 2022

• #4

Un solution qui traite mieux les cas atypiques, avec un classeur exemple... Attention format XLSX pour bénéficier des tableaux structurés

 

Pièces jointes

• vague641.xlsx

  25.3 KB · Affichages: 11

Vote positif 0 Vote négatif

VAGUE641

XLDnaute Occasionnel

• 26 Juillet 2022

• #5

Bonjour,

Merci beaucoup pour ton aide.....

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 26 Juillet 2022

• #6

Bonjour VAGUE641, Gardien de phare, le forum,

En B2 :

Code:

=SIERREUR(--GAUCHE(A2;TROUVE(" ";A2));"")

En C2 :

Code:

=SUPPRESPACE(STXT(A2;NBCAR(B2)+1;9^9))

Pour les numéros on ne se préoccupe pas des "Bis" ou "Ter".

A+

 

Pièces jointes

• tableau secteur(1).xlsx

  135.1 KB · Affichages: 4

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 26 Juillet 2022

• #7

Si l'on veut récupérer les "bis" et les "ter" on peut entrer en B2 :

Code:

=SIERREUR(--GAUCHE(A2;TROUVE(" ";A2));"")&REPT(" bis";ESTNUM(CHERCHE(" bis ";A2)))&REPT(" ter";ESTNUM(CHERCHE(" ter ";A2)))

 

Pièces jointes

• tableau secteur(2).xlsx

  135.1 KB · Affichages: 10

Vote positif 0 Vote négatif

VAGUE641

XLDnaute Occasionnel

• 26 Juillet 2022

• #8

Bonjour

Merci pour votre réponse,
une question, pourquoi je n'arrive pas à copier la formule dans un autre feuillet.

Merci,

Nath

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 26 Juillet 2022

• #9

On peut toujours copier-coller une formule dans une autre feuille si celle-ci n'est pas protégée.

 

Vote positif 0 Vote négatif

VAGUE641

XLDnaute Occasionnel

• 26 Juillet 2022

• #10

Merci Merci beaucoup, ca fonctionne très bien... J'avais 10000 lignes à modifier !!! fait en 10 secondes... Super Merci encore

Bonne et Belle après midi à vous,

Nath

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 26 Juillet 2022

• #11

VAGUE641 à dit:

J'avais 10000 lignes à modifier !!! fait en 10 secondes...

Cliquez pour agrandir...

Curieux, chez moi c'est immédiat.

Sur le fichier du post #7 j'ai recopié le tableau A2:C460 sur 10 098 lignes.

Cette macro s'exécute en moins de 1/10ème de seconde :

VB:

Sub a()
Dim t
t = Timer
[A:C].Copy [A1]
MsgBox Timer - t
End Sub

 

Vote positif 0 Vote négatif