Macro : transformer 0.00000 en 0 ou 128.00000 en 128

Bonjour

J'importe des données, certaines sont "0.00000", d'autres "128.0000", ...
Je cherche à les transformer en "0", "128", ....

Je lance l'enregistrement d'une macro avec Edition / Rechercher / Remplacer / . par , (un point par une virgule)

Quand je fais ça, les nombres perdent les 5 "0" derrière la virgule, c'est à dire que j'obtiens "0" ou "128"

Mais quand je lance cette macro, les 5 "0" restent : j'ai "0,00000" ou "128,00000)

Quelle est l'astuce pour faire disparaitre ces 0 après la virgule avec une macro ?

Merci

Bonjour,
Un essai

Merci !
Ca fonctionne bien. :-)

Toutefois, vu que j'ai quelques milliers de données, ça prend du temps. Il y a peut être moyen de faire plus vite ?

Bonjour,

Essayez ceci (les données étant en colonne A)

Columns("A:A").Replace What:=".*", Replacement:=""

Cdlt

Columns("A:A").Replace What:=".*", Replacement:=""

Bonjour
Pouvez vous me préciser comment utiliser cette solution ? Où faut il la mettre ?
merci

Bonjour,

Il faut le mettre dans une macro, un "Sub". Par exemple :

Sub MacroX()
Columns("A:A").Replace What:=".*", Replacement:=""
End Sub

Cependant… Il semble que vous aviez déjà la solution. Pourquoi ne pas simplement ajuster le format de nombre en réduisant le nombre de chiffres significatifs ? Une macro me semble assez inutile pour le coup.

Codes des formats de nombre - Support Microsoft

Bonjour,

Autre solution (sans macro)

Sélectionner la (ou les) colonne(s) à modifier

Passer la (les) colonne(s) au format "Nombre" (avec ou sans décimales)

Sur Windows, pour Remplacer un caractère, on utilise la combinaison Ctrl + H (sur Mac, peut-être Cmd + H)

Dans la première case (Rechercher), mettre un point.

Dans la seconde (Remplacer par), mettre une virgule

Et normalement, c'est bon...

Je vous remercie pour vos différentes solutions et votre réactivité. :-)