Loop range copy based on previous column

"Not working" covers a lot of ground. Are you getting an error, or what?

(It looks like you are mixing up the two last row vars, BTW) Better to use longer, more descriptive names.

"LastRowOfColumnA" for example.

I didn't get an error. but nothing is happening. However if i removed "& Last_Row" from "Range("D2").Resize(lastrow).Copy Range("F2" & Last_Row)",

i get the copy of what's on the column D but it's not looping until the last row of column A.

You're almost there Quixologies! just need to fill the column F until the last row of column A... i attached sample data for you for better understanding

I'm really trying, hehe... maybe this code might help, but still not my desired result.

Please Login or Register  to view this content.

the only lacking is that its not pasting the data (data from D2 until last row) to column F until the last row of column A.

I'm thinking of this:

Please Login or Register  to view this content.

but still can't get it to work...

So you aren't just copying, you're doing some sort of autofill based on a pattern.

Looks like you're stuck looping over the range somehow.

First you need to obtain the number of rows in your pattern in column D.

Then you'd simply loop over the number of rows of data in A with a step-counter equal to the length of your pattern.

Each time through the loop you'd copy the contents of the range holding your pattern to the next set of rows in Column F

You'll have to use MOD to get any remainder figured out for the last portion of the pattern (if it doesn't divide evenly)

I don't have time to come up with the code for that right now, though! Sorry!