Copy/Paste Values Only

[Ron512]

How do I adjust the below statement so the values copied are values only?

Thanks
Ron

Ws.Range("H17:H40").Copy Sheets("Summary").Cells(4, last_col + 1)

 

[Diving_Dan]

Try

Ws.Range("H17:H40").Copy Sheets("Summary").Cells(4, last_col + 1).PasteSpecial Paste:=xlPasteValues

 

[Fluff]

How about

Sheets("Summary").Cells(4, last_col + 1).Resize(24).Value = ws.Range("H17:H40").Value

 

[Ron512]

Thanks to both of you for the blazing fast response speed.

Diving-Dan, I get a compile error expected end of statement on Paste.

Fluff, Works great. I don’t understand how it works or Resize(24), although when this fire is out I will go back and learn.

 

[Fluff]

Glad we could help & thanks for the feedback.