Remplacement point par virgule avec VBA

Fermé
boggg - 3 janv. 2008 à 16:01
 Carlguer - 22 nov. 2020 à 01:12
Bonjour,

Pour ceux qui connaissent vba excel,

j'ai fait une macro très simple qui sélectionne feuille et qui remplace les points par des virgules,

quand on le fait "à la main" (Edition/Remplacer, etc) cela marche très bien.

Par contre avec la macro, qui décrit en effet l'action décrite ci-avant, ne marche pas.

Par exemple pour les numéro du type : 1.27365e+006
la macro les transforme en : 127365000000

voila la macro, elle est très simple :

Sub pv3()

Cells.Select
Application.CutCopyMode = False
Selection.NumberFormat = "General"
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False

End Sub


Je vous remercie d'avance pour votre réponse
A voir également:

6 réponses

Le sujet est sûrement clos, mais pour les suivants qui en auront besoin :

Il faut remplacer le point par un point dans la macro. Dans mon cas :

Selection.Replace What:=".", Replacement:=".", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
39
intéressée
19 nov. 2008 à 17:39
Merci !!!!!!!!! ça fait super longtemps que je cherche, et la réponse n'est pas évidente... Merci encore d'avoir répondu à ce post, ça tombe super bien pour moi.
0
Boule de gomme
20 mai 2013 à 19:08
Merci, je n'avais pas encore trouver ...
0
Merci ! Pas évident à deviner...
0
Et ben on peut te dire merci, ça fait 1000 ans que je cherche !!
0
Merci beaucoup! je vais tester! :-)
0