Macro pour changer un format de cellule nombre
marine
-
Frenchie83 Messages postés 2254 Statut Membre -
Frenchie83 Messages postés 2254 Statut Membre -
Bonjour,
Si quelqu'un peux m'aider svp ...
Je fais des extractions de données en provenance de mon progiciel SAP.
Cependant, quand j'extrais des quantités, les chiffres apparaissent de cette manière : 14.000,000
J'aimerai créer une macro qui me transforme ce 14.000,000 en 14000.
Quelqu'un peux m'aider ??
Merci beaucoup par avance
Marine
Urgent supprimé. Hors-Charte. La modération.
Si quelqu'un peux m'aider svp ...
Je fais des extractions de données en provenance de mon progiciel SAP.
Cependant, quand j'extrais des quantités, les chiffres apparaissent de cette manière : 14.000,000
J'aimerai créer une macro qui me transforme ce 14.000,000 en 14000.
Quelqu'un peux m'aider ??
Merci beaucoup par avance
Marine
Urgent supprimé. Hors-Charte. La modération.
2 réponses
-
Bonjour,
Avec la fonction Replace:
https://silkyroad.developpez.com/VBA/ManipulerChainesCaracteres/#LI-J
-
Bonjour
En supposant que les valeurs se trouvent dans la colonne A à partir de la cellule 2Sub Transforme() For i = 2 To [A100000].End(xlUp).Row Cells(i, 1) = CLng(Left(Replace(Cells(i, 1), ".", "", 1), InStr(1, Cells(i, 1), ",", 1) - 1)) Next i End Sub
remplacez le "1" dans Cells(i, 1) par le n° de la colonne de votre feuille.
sinon sans passer par une macro. copiez la formule suivante dans une colonne vide, remplacez le "A" par la lettre de la colonne où se trouve vos valeurs et tirez vers le bas. faites un copié-collage spécial valeurs de cette colonne pour remplacer les anciennes valeurs
=GAUCHE(SUBSTITUE(A1;".";"");TROUVE(",";SUBSTITUE(A1;".";"");1)-1)
cdlt