Help creating a looping macro for data in the same format but with different number of rows?

[Coyotex3]

Hello all I hope that you can all help me. I'm trying to create a macro that accomplishes the following.

Everytime I export data into Excel, I want it to copy whatever is on A7 until it reaches "Total." Then I want it to go 3 cells below the "Total" and copy whatever is on that cell until it reaches "Total." Then I want it to go 3 cells below the "Total" etc.

The next thing I would like is if possible for it to be dynamic. For example one day A7 will be empty until row A15 but one day it may be empty until row 25. I want it to always copy down until "Total" and then jump the three cells down.

I would like for the Macro to do that until there is no more data. I usually export files with about 2000 rows. Sometimes we have 100 different cells that need to be copied down. I'm trying to make that easier.

 

[Fluff]

Where can I go look to learn these?

Probably the best place is sites like this one.

This is absolutely perfect.

Glad we could help & thanks for the feedback

 

[Coyotex3]

Probably the best place is sites like this one.

Glad we could help & thanks for the feedback

If I have a follow up question(trying to build on this macro) should I ask on this thread or create a new one?

 

[Fluff]

If it's a significantly different question, then it needs a new thread.

 

[Coyotex3]

If it's a significantly different question, then it needs a new thread.

Got it thank you.

 

[Fluff]

You're welcome.

 

[Coyotex3]

How about

Sub Coyotex()
   Dim Rng As Range
   For Each Rng In Range("B1", Range("B" & Rows.Count).End(xlUp)).SpecialCells(xlConstants).Areas
      Rng.Offset(, -1).FillDown
   Next Rng
End Sub

Hey sorry, one question, Is there a way of tweaking this a bit. When running the macro it is picking up the header in "Column 1" and copying that down. I'm trying to keep it so it doesn't select the header. Any tips?

 

[Fluff]

Just change the B1 to B2

 

[Coyotex3]

Thank you Once again. You single handedly just freed up about 6 hours of my week.

 

[Coyotex3]

Just change the B1 to B2

Hey another question. Is there a way I can tweak this more so that it copies both columns A and B and the data is displayed like this?

 

[Coyotex3]

Trying to copy the values on Columns A and B to fill the rest of the data set. I would like for the macro to copy A2 and B2 and stop at A6 and B6 and then copy A10 and B10 until next non-blank etc.