Paste Values
Hi,
I have a piece of code I'm using to copy some values that are an external data table. How would I modify this so that, when I copy and paste, I only paste the values?
Many thanks in anticipation
With Workbooks(Scoresheet).Worksheets("DataTable") LastRow = .Range("P" & .Rows.Count).End(xlUp).Row .Rows("1:" & LastRow).Copy Workbooks(Scoresheet).Worksheets("Imported").Range("A" & LastRow) Application.CutCopyMode = False End With
change
to.Rows("1:" & LastRow).Copy Workbooks(Scoresheet).Worksheets("Imported").Range("A" & LastRow)
.Rows("1:" & LastRow).Copy Workbooks(Scoresheet).Worksheets("Imported").Range("A" & LastRow).PasteSpecial xlpastevalues
Josie
if at first you don't succeed try doing it the way your wife told you to
Many thanks. That's what I thought but when I run the code I then get an error message 1004, Unable to get the Pastespecial property of the Range Class.
is the target sheet protected? what is the value of lastrow?
You have used the Lastrow variable for both the source and destination. Are they having the same number of rows?
Or else you can useWorkbooks(Scoresheet).Worksheets("Imported").Range("A" & LastRow).PasteSpecial (xlpastevalues)
If I have helped, Don't forget to add to my reputation (click on the star below the post)
Don't forget to mark threads as "Solved" (Thread Tools->Mark thread as Solved)
Use code tags when posting your VBA code: [code] Your code here [/code]
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks