OVH Cloud OVH Cloud

Fichier CSV

3 réponses
Avatar
le lauxeti
Je recupere par macro un fichier CSV. Dans ce fichier la=20
virgule remplace le point.
Je souhaiterais par code vba, remplacer donc la virgule=20
par le point

la macro cr=E9e par l'enregistreur ne fonctionne pas,=20
Sub Macro1()
'
'

'
Cells.Select
Selection.Replace What:=3D",", Replacement:=3D".",=20
LookAt:=3DxlPart, _
SearchOrder:=3DxlByRows, MatchCase:=3DFalse,=20
SearchFormat:=3DFalse, _
ReplaceFormat:=3DFalse
End Sub

Comment resoudre ce pb?
Merci encore

YB

3 réponses

Avatar
Clément Marcotte
http://groups.google.com/groups?hl=fr&lr=&ie=UTF-8&oe=UTF-8&threadm=%23EzaT5izDHA.2872%40TK2MSFTNGP09.phx.gbl&rnum=1&prev=/groups%3Fq%3Dguillemets%2Bgroup:microsoft.public.fr.excel%2Bauthor:clement.marcotte%2540sympatico.ca%26hl%3Dfr%26lr%3D%26ie%3DUTF-8%26oe%3DUTF-8%26scoring%3Dd


"le lauxeti" a écrit dans le
message de news:016c01c3db92$b7b90510$
Je recupere par macro un fichier CSV. Dans ce fichier la
virgule remplace le point.
Je souhaiterais par code vba, remplacer donc la virgule
par le point

la macro crée par l'enregistreur ne fonctionne pas,
Sub Macro1()
'
'

'
Cells.Select
Selection.Replace What:=",", Replacement:=".",
LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse,
SearchFormat:úlse, _
ReplaceFormat:úlse
End Sub

Comment resoudre ce pb?
Merci encore

YB
Avatar
Clément Marcotte
Oupss! C'est à l'envers, excusez pardon. Pour le reste, il y a eu une
réponse aujourd'hui même.

"Clément Marcotte" a écrit dans le
message de news:%23$

http://groups.google.com/groups?hl=fr&lr=&ie=UTF-8&oe=UTF-8&threadm=%23EzaT5izDHA.2872%40TK2MSFTNGP09.phx.gbl&rnum=1&prev=/groups%3Fq%3Dguillemets%2Bgroup:microsoft.public.fr.excel%2Bauthor:clement.marcotte%2540sympatico.ca%26hl%3Dfr%26lr%3D%26ie%3DUTF-8%26oe%3DUTF-8%26scoring%3Dd



"le lauxeti" a écrit dans le
message de news:016c01c3db92$b7b90510$
Je recupere par macro un fichier CSV. Dans ce fichier la
virgule remplace le point.
Je souhaiterais par code vba, remplacer donc la virgule
par le point

la macro crée par l'enregistreur ne fonctionne pas,
Sub Macro1()
'
'

'
Cells.Select
Selection.Replace What:=",", Replacement:=".",
LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse,
SearchFormat:úlse, _
ReplaceFormat:úlse
End Sub

Comment resoudre ce pb?
Merci encore

YB



Avatar
ybrunet
Merci Clément,

Tu me retires une sacré epine ...

Cordialement
le lauxeti

Ps : Un grand BONJOUR à tous les Canadiens
"Clément Marcotte" wrote in message news:<#...
Oupss! C'est à l'envers, excusez pardon. Pour le reste, il y a eu une
réponse aujourd'hui même.

"Clément Marcotte" a écrit dans le
message de news:%23$

http://groups.google.com/groups?hl=fr&lr=&ie=UTF-8&oe=UTF-8&threadm=%23EzaT5izDHA.2872%40TK2MSFTNGP09.phx.gbl&rnum=1&prev=/groups%3Fq%3Dguillemets%2Bgroup:microsoft.public.fr.excel%2Bauthor:clement.marcotte%2540sympatico.ca%26hl%3Dfr%26lr%3D%26ie%3DUTF-8%26oe%3DUTF-8%26scoring%3Dd



"le lauxeti" a écrit dans le
message de news:016c01c3db92$b7b90510$
Je recupere par macro un fichier CSV. Dans ce fichier la
virgule remplace le point.
Je souhaiterais par code vba, remplacer donc la virgule
par le point

la macro crée par l'enregistreur ne fonctionne pas,
Sub Macro1()
'
'

'
Cells.Select
Selection.Replace What:=",", Replacement:=".",
LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:úlse,
SearchFormat:úlse, _
ReplaceFormat:úlse
End Sub

Comment resoudre ce pb?
Merci encore

YB