xlPasteValues
 

This works great to copy/paste from one sheet to another,
rng1.EntireRow.Copy Destination:=Worksheets("Hist").Cells(Rows.Count,
1).End(xlUp)(2)

What would the code be to copy/paste values ?

xlPasteValues
 

Hi Dale

You can see here two examples
xlPasteValues and the Value property

http://www.rondebruin.nl/copy1.htm



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"Dale" wrote in message ...
This works great to copy/paste from one sheet to another,
rng1.EntireRow.Copy Destination:=Worksheets("Hist").Cells(Rows.Count,
1).End(xlUp)(2)

What would the code be to copy/paste values ?

xlPasteValues
 

rng1.EntireRow.Copy

Worksheets("Hist").Cells(Rows.Count,1) _
.End(xlUp)(2).PasteSpecial xlValues

--
Regards,
Tom Ogilvy


"Dale" wrote:

This works great to copy/paste from one sheet to another,
rng1.EntireRow.Copy Destination:=Worksheets("Hist").Cells(Rows.Count,
1).End(xlUp)(2)

What would the code be to copy/paste values ?