cellule

Le
Bernard SALIEN
Bonjour,

Dans une cellule 5 chiffres , un espace, des lettres
question:
peut on facilement récupérer les chiffres et les mettre seuls dans une autre
cellule.

Pas trop bizarre comme question?

Merci de vos conseils s'ils existent!

BS
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Chenille
Le #5091041
Bonjour,

en A1 12345 abcdefg
pour récup sous forme de texte
=GAUCHE(A1;5)
pour récup valeur
=CNUM(GAUCHE(A1;5))

Denis P



Bonjour,

Dans une cellule 5 chiffres , un espace, des lettres
question:
peut on facilement récupérer les chiffres et les mettre seuls dans une autre
cellule.

Pas trop bizarre comme question?

Merci de vos conseils s'ils existent!

BS





poc
Le #5091031
Bonjour,
Pour la cellule C19
=CNUM(GAUCHE(C19;5))
Cordialement
Poc

"Bernard SALIEN" 4756a4a7$0$25936$
Bonjour,

Dans une cellule 5 chiffres , un espace, des lettres
question:
peut on facilement récupérer les chiffres et les mettre seuls dans une
autre cellule.

Pas trop bizarre comme question?

Merci de vos conseils s'ils existent!

BS



zOrg2net
Le #5091021
Bonjour Bernard,
Il faudrait nous en dire plus. Comme: est-ce que les chiffres commencent
toujours tes valeurs? Y-a-t-il toujours un espace après les chiffres? Quel
est en fait le format de tes données?

zOrg2net
7OuNet
Le dicton du jour: La Droite cherche un nouvel élan... Oui, ils ont trouvé
la femelle mais il leur manque le mâle...


Bonjour,

Dans une cellule 5 chiffres , un espace, des lettres
question:
peut on facilement récupérer les chiffres et les mettre seuls dans une autre
cellule.

Pas trop bizarre comme question?

Merci de vos conseils s'ils existent!

BS





FFO
Le #5090941
Salut à toi
Soit la cellule active à traiter quelque soit le nombre et la position des
chiffres
Dans la cellule adjacente l'ensemble des chiffres trouvés avec ce code :

For i = 1 To Len(ActiveCell)
car = Mid(ActiveCell, i, 1)
If car = 0 Or car = 1 Or car = 2 Or car = 3 Or car = 4 Or car = 5 Or car = 6
Or car = 7 Or car = 8 Or car = 9 Then
chainenum = chainenum & car
End If
Next
ActiveCell.Offset(0, 1) = chainenum

Celà devrait faire


Bonjour,

Dans une cellule 5 chiffres , un espace, des lettres
question:
peut on facilement récupérer les chiffres et les mettre seuls dans une autre
cellule.

Pas trop bizarre comme question?

Merci de vos conseils s'ils existent!

BS





Bernard SALIEN
Le #5090921
Merci messieurs, impeccable
"FFO"
Salut à toi
Soit la cellule active à traiter quelque soit le nombre et la position des
chiffres
Dans la cellule adjacente l'ensemble des chiffres trouvés avec ce code :

For i = 1 To Len(ActiveCell)
car = Mid(ActiveCell, i, 1)
If car = 0 Or car = 1 Or car = 2 Or car = 3 Or car = 4 Or car = 5 Or car =
6
Or car = 7 Or car = 8 Or car = 9 Then
chainenum = chainenum & car
End If
Next
ActiveCell.Offset(0, 1) = chainenum

Celà devrait faire


Bonjour,

Dans une cellule 5 chiffres , un espace, des lettres
question:
peut on facilement récupérer les chiffres et les mettre seuls dans une
autre
cellule.

Pas trop bizarre comme question?

Merci de vos conseils s'ils existent!

BS







Publicité
Poster une réponse
Anonyme