Bonjour Netparty, le forum
VB:
ThisWorkbook.Worksheets("IMPORT").Range("C2:C" & .Cells(.Rows.Count, 2).End(xlUp).Row).PasteSpecial xlPasteValues
mais il est plus simple de faire directement
Code:
ThisWorkbook.Worksheets("IMPORT").Range("C2:C" & .Cells(.Rows.Count, 2).End(xlUp).Row).Value = .Range("F2:F" & .Cells(.Rows.Count, 2).End(xlUp).Row).Value
que de faire un copier/coller
Cordialement, @+