code vba "remplacer par"

[Diop]

bonjour à tous,

j'ai un petit probleme sur un fichier car je veux remplacer les points par rien. lorsque je le fais manuellement çà marche . par contre dès que j'utilise le code vba ci dessus :

Sub remplacer()
Cells.Select
Selection.Replace What:=".", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False

End Sub

Lorsque je lance la macro il me fais le travail mais en plus lorsqu'il rencontre une un nombre decimal, il vire la virgule.

Merci de votre aide.

 

[Fennec]

ben figure toi que je me suis posé le meme problème à une demi heure d'intervalle. Quand je cherchais à remplacer les points par des virgules, ben il faisait rien de bien. Par ex 1.25 devenait 125 au lieu de 1,25...

J'ai trouvé cette solution sur un autre topic :
http://www.excel-downloads.com/html/French/forum/read.php?f=1&i=80243&t=80239

C pas super rapide, ms ca a l'avantage de marcher chez moi, si ca peut te suffire...

Tjrs est -il que je comprends pas pourquoi ce qu'Excel fait très bien à la main(via Edition/remplacer), il y arrive pas en utilisant VBA... Si qqn a la réponse, ca m'interesse.

Merci

 

[Eric C]

Bonjour le forum
Bonjour Diop & Fennec


Replacement:=" " avec un espace entre les guillements. Pour ma part cela fonctionne sans problème avec un format monétaire ou de compta.

@ ++ Eric C

 

[@+Thierry]

Bonsoir le Fil

Juste pour complément d'info un Fil avec plusieurs solutions...

=> Lien supprimé

Avec l'aimable participation de :
Laeti,
Jean-Marie,
Alain,
Rhodan,
Vériland
G'claire,
...et votre humble narrateur...

Bonne Soirée

@+Thierry

 

[Fennec]

Sont cons aussi ses amerlocs à mettre des points à la places des virgules 😛
En tout cas, merci le forum !