Re : Problème de format texte nombre
Bonjour JUMJ, le forum,
Je n'y connais pas grand chose en macro mais essai la modif suivante.
Sub essai()
Range("A1").Select
h = ActiveSheet.UsedRange.SpecialCells(xlLastCell).End(xlToLeft).Row
Range(Cells(2, 1), Cells(h, 3)).Select
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Range("IV1").Select
Selection.Copy
Range(Cells(2, 1), Cells(h, 3)).Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlAdd, SkipBlanks:= _
False, Transpose:=False
End Sub
JHA