Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy every 3rd cell, define destination range for paste
Hi all,
I'm trying to copy every third cell of column c starting at C16, and paste into column C of the next blank row of a separate workbook. This code below kind of works but it errors where I've defined the 'pasterange' in the other workbook (I think this is incorrect but you know what I'm trying to achieve!). Can anyone help?? :-) Also I don't know how to set the code to copy from C16 to nrows - if it copies from the bottom i need to go up a row, copy that, then copy every 3rd. Column C looks like this... 35467 <---- (Row 16) text 1 BLANK 84950 text 2 BLANK 24967 text 3 BLANK I need all the numbers... Code below Dim pasterange As Range Dim i As Long Set pasterange = Windows("LFmacro.XLS").Sheets("Report").Range("A65 536").End(xlUp).Offset(2) LastRow = Cells(Rows.Count, 3).End(xlUp).Row For i = 1 To LastRow Step 2 pasterange = Cells(i, 1) Next i |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Range.Copy [Destination] should not use clipboard | Excel Discussion (Misc queries) | |||
Range.Copy only works with a named destination parameter? | Excel Programming | |||
copy paste values only using destination:= | Excel Programming | |||
Range.Copy (Destination) | Excel Programming | |||
user form to copy and paste from source to destination | Excel Programming |