Copy and paste values and formats

[NDMDRB]

Hello,

I have below piece of code in sub that copy a range and paste the selected in another range, it works fine but how can I make it to copy and paste the selected as values and formats

I tried to use ".Paste" but I got an error

  Sheet2.Range("Sales_List_All").Copy
  Sheet2.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues

 

[Akuini]

Try:

Sheet2.Range("Sales_List_All").Copy
With Sheet2.Cells(Rows.count, 1).End(xlUp).Offset(1, 0)
  .PasteSpecial xlPasteValues
  .PasteSpecial xlPasteFormats
End With