Discussion :

[bentlse]

novice, je cherche à integrer sous Excel la macro suivante de remplacement du caractère "." par la fameuse ","

j'utilise tout simplement la syntaxe suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False

or pour un nombre du type 2.30642E+00 je me récupère 230642 au lieu de 2,30642

tout se passe bien pourtant si je réalise l'opération directement sans macro. Il n'ya rien de plus basique mais je ne sais pas ou se trouve l'erreur.
merci
bentlse

[ouskel'n'or]

Ce n'est pas plutôt ça que tu voudrais faire ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox CDbl(Replace(Cells(1, 1), ".", ""))

J'ai mis 2.30642E+00 dans A1
A+

NB - Ça fonctionne aussi avec Val

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox Val(Replace(Cells(1, 1), ".", ""))

[bentlse]

En fait l'expression
Selection.Replace What:=".", Replacement:="xxxxxxxx", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
fonctionne bien si je remplace xxxxxxxx par n'importe quelle chaine de caractère à l'exception de la virgule.
J'ai besoin de la virgule pour que le chiffre soit interprété en tant que nombre.

Je dois pouvoir m'en sortir avecune autre expression mais je souhaitais savoir pourquoi il y avait cette exception avec la virgule?

Je suppose qu'il faut que je fasse des boucles sur les lignes et colonnes pour pouvoir utiliser l'expression suivante Replace(Cells(1, 1), ".", "")

[ouskel'n'or]

En effet, Excel ne reconnaissant pas le point comme partie intégrante d'une valeur, je ne pense pas qu'une fonction Excel puisse faire ce type de remplacement, à moins, peut-être en définissant tes cellules en Texte. Pas testé mais tu peux essayer.
Tiens-nous au courant, c'est intéressant à savoir
A+