Bonjour,

Mon problème est le suivant.
J'ai un fichier Excel est je souhaite convertir toutes les cellules, en remplaçant les . par des , (mettre sous forme de nombre) pour faire tourner des calculs.

Cette opération fonction en manuel (transforme 12.500
13.000 13
13.500 = > 13,5
14.000 14

l'enregistreur de macro donne le code suivant pour l'opération.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
 Range("A36:A44").Select
  Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

mais quand je compile cette macro sur d'autres cellules la conversion se fait mal et j'obtiens :
13.000 13 000
13.500 = > 13 500
14.000 14 000

Merci pour votre aide !