Changer un format Text en Number dans une macro

Question

Bonjour,

J'essai de change le format d'une colonne ... de texte à "Number".

Je commence par changer le point par une virgule puis je change le format ... évidement ça fonctionne très bien manuellement mais dans ma macro le format des cellules m'indique "Number" mais le data est traité comme texte

Columns("Q:Q").Select
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
Selection.NumberFormat = "0.00"

J'ai la version 2007 d'Excel ... quelqu'un peux me donner un coup de main ?

Merci
Francois

4u4me4us · Answer

utilise la fonction datevale mais laisse les points

Flefe2000 · Answer

Bonjour 4u4me4us

Pourquoi le Dateval ? 

Je vais donner plus de détails ... 

Ma macro importe un fichier CSV ... une colonne contient ceci: (Asset 

Cost) Unit Amount
18.18
18.18
18.18
8.64
8.64
3.24
4.68

Ce data est en format "Text" suite à l'importation. je dois le transformer en "Number" sinon au moment ou je rafraichie la "Pivot Table" je me retrouve avec des "0.00" 

Merci

4u4me4us · Answer

Dans ce cas utilise la fonction de conversion csng()

Flefe2000 · Answer

D'ac ... je vais lire un peu sur cette fonction

Merci ... je te tiens au courant ...

4u4me4us · Answer

Si tu veux je v être plus précis.

ton fichier à la valeur 18.18 comme il est un texte il est "18.18". dans une sub tape les deux lignes suivant

dim Varible_Conversion as singel 
Varible_Conversion = csng("18.18")


La ta valeur est convertie en 18.18.

4u4me4us · Answer

Alors, résolu ou non ?

Flefe2000 · Answer

Bonjour 4u4me4us

Désolé de ne pas avoir répondu ... j"ai quelque feux à éteindre mais j'essai au courant de la semaine ...

Je te tiens au courant

Merci encore

Flefe2000 · Answer

Bingo !!!

Merci beaucoup 4u4me4us ...

4u4me4us · Answer

2rien

Changer un format Text en Number dans une macro

9 réponses

Votre réponse

Discussions similaires