Destination paste values

Hi

What should I add to this code so it would paste values only? I tried adding .Value to end on Range("B1"), but it doesn't work.

 Workbooks("base").Sheets("VM").Range("F1").Select
 Range(Selection, Selection.End(xlDown)).Copy _
Destination:=Workbooks("result.xlsx").Sheets("testdata").Range("B1")