CUt Unknown sized item

[biotechguy]

I have a spreadsheet that returns data in 12 Columns (A-L). My goal is to have the G-L columns be cut and then added to the bottom of the A-L columns.

The problem I have is that both sets of columns can have varying amounts of rows. Also, I have a header region in columns A-L that goes to the seventh row.

How can I go about having a macro do this?

Thanks

 

[Jonmo1]

Definately make backup copy first.

But this should work.

Sub Test()
for i = 1 to 6
LR1 = Cells(Rows.Count, i).End(xlup).Row
LR2 = Cells(Rows.Count, i + 6).End(xlup).Row

Range(Cells(8, i + 6), Cells(LR2, i + 6)).Copy Cells(LR1 + 1, i)
next i
Range("G:L").EntireColumn.Delete
End Sub

 

[biotechguy]

Almost got it

The macro that was sent was almost perfect, but:

The line from G7:L7 is not getting transfered over .

I know this is a simple change, but I cant figure it out

 

[Jonmo1]

You said you had headers going through up to row 7, so I started on row 8...

change the 8 to a 7

 

[biotechguy]

Haha. I feel like a moron . Thank you so much this works perfect now.

Thanks again