View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
[email protected] husky101@yahoo.com is offline
external usenet poster
 
Posts: 8
Default Paste Special Values

Hi NG,
I have this code, which is used to copy a column containing a formula,
and pastes into another sheet.

However, it pastes the formula, but I need it to paste the values, and
I don't know how to modify this code to do it.

This is a code I found on this forum some time ago and it has been very
useful to me.

any help will be greatly appreciated.

Cheers Paul

Sub TotalPriceCopy()

Application.ScreenUpdating = False
Dim wks1 As Worksheet
Dim wks2 As Worksheet
Set wks1 = Workbooks("ClearSaleUpload
Master.xls").Worksheets("IMPUT")
Set wks2 = Workbooks("ClearSaleUpload
Master.xls").Worksheets("ClearSaleUpload")

With wks1
.Range(.Range("G2"), .Range("G2").End(xlDown)).Copy
wks2.Range("G2")
End With

Set wks1 = Nothing
Set wks2 = Nothing
Application.ScreenUpdating = True
End Sub