Remplacer point par virgule VBA
Résolu
Lapaust26
-
michnum -
michnum -
Bonjour,
J'essaye de remplacer les points par une virgule à l'aide de la fonction replace de VB.
Ça fonctionne correctement pour les petites chaines mais j'ai un chiffre assez grand : 23.7048261485505 et au lieu de m'écrire 23,7048261485505 j'obtiens 237048261485505.
J'ai essayer avec ces deux code :
Columns("B:K").Select
Selection.Replace What:=".", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByColumns, MatchCase:=True, SearchFormat:=False, _
ReplaceFormat:=False
et
Worksheets("modelisation salle TD SITUATION").Columns("B:K").Replace _
What:=".", Replacement:=",", _
SearchOrder:=xlByColumns, MatchCase:=True
Dans les deux cas j'obtiens la même chose.
Please help me
J'essaye de remplacer les points par une virgule à l'aide de la fonction replace de VB.
Ça fonctionne correctement pour les petites chaines mais j'ai un chiffre assez grand : 23.7048261485505 et au lieu de m'écrire 23,7048261485505 j'obtiens 237048261485505.
J'ai essayer avec ces deux code :
Columns("B:K").Select
Selection.Replace What:=".", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByColumns, MatchCase:=True, SearchFormat:=False, _
ReplaceFormat:=False
et
Worksheets("modelisation salle TD SITUATION").Columns("B:K").Replace _
What:=".", Replacement:=",", _
SearchOrder:=xlByColumns, MatchCase:=True
Dans les deux cas j'obtiens la même chose.
Please help me
2 réponses
-
Petite erreur de copie j'avais bien mis une virgule dans mon code.
Mais j'ai trouvé la solution, en fait si je met What:=".", Remplacement:=".", excel reconnait mon point de remplacement comme une virgule ( paramètres par défaut du logiciel en français) et accepte les longues chaîne svoili voilou.
Merci à toi ++
