With Worksheets("sheet1").UsedRange
.Copy
.PasteSpecial Paste:=xlPasteValues
End With


or

with worksheets("sheet1").usedrange
.value = .value
end with



"MACRE0 <" wrote:

There must be an easy way to copy the entire active sheet and paste it
atop itself. So far all I've been able to do is paste it to another
sheet with a specified range (don't wish to use a1:iv65536) or copy all
sheets with any range to a new sheet. I suppose I could modify them to
fit my needs, but I'd really appreciate some help here. Especially
since it should be easier that the first two I mentioned. Thank you in
advance. -MACRE

---
Message posted from http://www.ExcelForum.com/

--

Dave Peterson