Did you see this post?Simon Lloyd;184186 Wrote:
Surely with this:
Code:
--------------------
With Workbooks("Book.xls").Worksheets("Sheet1")
.Range(strPrevRange).Copy
.Range(strPrevRange).PasteSpecial (xlPasteValues)
End With
--------------------
you meant:
Code:
--------------------
With Workbooks("Book.xls").Worksheets("Sheet1")
.Range(strPrevRange) = .Range(strPrevRange).Value
End With
--------------------
to remove all the formulae?
--
Simon Lloyd
Regards,
Simon Lloyd
'The Code Cage' (
http://www.thecodecage.com)
------------------------------------------------------------------------
Simon Lloyd's Profile:
http://www.thecodecage.com/forumz/member.php?userid=1
View this thread:
http://www.thecodecage.com/forumz/sh...ad.php?t=50861