enlever uniquement les chiffres dans une cellule

S

STEPH

Guest
Hello,

J'ai un fichier de +/- 10000 adresses en excel. L'adresse (= nom de rue et n° de maison) est contenue dans une seule cellule. Moi ce qu'il me faut, c'est une cellule contenant la rue (sans le numéro!) et une autre contenant le numéro. Est-ce possible.

le numéro est toujours situé à droite de la rue et peut comprendre de 1 à 4 chiffres.

Merci pour votre aide !!! (a la main j'en ai pour 2 semaines!!)

Steph
 
F

Francois

Guest
Essaie les deux fonctions ci dessous :

Function rue(complet)
lg_ch = Len(Trim(complet))
i = 1
Do While (IsNumeric(Right(complet, i)))
i = i + 1
Loop
rue = Left(complet, lg_ch - i + 1)
End Function

Function num(complet)
lg_ch = Len(Trim(complet))
i = 1
Do While (IsNumeric(Right(complet, i)))
i = i + 1
Loop
num = Right(complet, i - 1)
End Function
 
S

STEPH

Guest
Merci beaucoup, François.

Mais je suis nul de chez nul en VB ( j'ai carrément jamais essayé!). J'ai mis un extrait de la db en attachment.

Pourrais-tu (ou une autre bonne âme) installer le script?

Merci d'avance ! !
 

Pièces jointes

  • exemple.xls
    13.5 KB · Affichages: 53
  • exemple.xls
    13.5 KB · Affichages: 53
  • exemple.xls
    13.5 KB · Affichages: 53
P

pat5

Guest
Bonsoir Steph

Essaye ça tu met la formule dans une cellule à coté de ton adresse et tu tire jusqu'à 10000.
Pour le numéro c'est la formule Droite et pour la rue c'est la Gauche
Plus une autre formule pour apprendre !!

Salut ,o)
 

Pièces jointes

  • STEPH.xls
    14.5 KB · Affichages: 52
  • STEPH.xls
    14.5 KB · Affichages: 53
  • STEPH.xls
    14.5 KB · Affichages: 59

Discussions similaires

Statistiques des forums

Discussions
314 651
Messages
2 111 553
Membres
111 199
dernier inscrit
mavoungou regis