Copy Paste range multiple times

[vfa]

Hi, I hope someone can help me with developing a macro. Please note that I have no VBA knowledge but have experimented with recording very basic macros in the past...

Here's the challenge:

I would like to copy and paste a range multiple times from worksheet1 to worksheet2. More specifically, the range will always consist of two adjacent columns with a varying number of rows, let's say B1:C100 for example. So if I need to copy it 6 times, starting the paste on B1 of worksheet2, the result would be B1:C600 would have the range in it (6 times, one right on top of the other).

I hope this makes sense and wasn't too bad of an explanation. Thanks in advance for your assistance.

 

[Datsmart]

Hi vfa,

Welcome to the board!


This will copy the selected range 6 times to Sheet2:

Sub Copy6Times()
rng = Selection.Address
    For t = 1 To 6
        LR = Sheets("Sheet2").Range("B65536").End(xlUp).Row + 1
        Range(rng).Copy Sheets("Sheet2").Range("A" & LR)
    Next t
End Sub

 

[vfa]

Thank you Datsmart! You've saved me a LOT of time tonight. Cheers!

 

[achonikolov]

Guys,

I have almost the same issue.
1. I need to copy range from sheet1 a1 to empty cell as many times as we have fill coloumn and paste to sheet2 starting from a2.
2. Then I need to copy range c4 to end from sheet1 and then paste to sheet2 starting from c2
3. Copy range d4 to end from sheet1 and paste to sheet2 starting from d2
4. Copy range e4 to end from sheet1and paste to sheet2 starting from e2

I have a file for example but dont know how to attach to post

I will be very grateful if you can help me.
if the place of this post is not here please move it but I decided to put a topic here.
Thanks in advance.