VBA Code for Deleting 2 Rows Repetitively

**kitcargray** · 10-09-2012, 09:05 AM

Hello,

I am trying to figure a way to loop through a range in order to delete 2 rows using a range.offset (1,0).
Basically, the macro or code has to go down one cell and then delete 2 rows. This has to be repeated until the end of the range. The range is rows 2 to 63.

So, the code would delete the 2 rows (rows 3 and 4) below row2, then it would delete rows 6 and 7, then rows 9 and 10 .

I am pretty crappy at VBA but I want to learn how to do it. Any help would be greatly appreciated.

Here is what I have so far. I know how to declare a range and how to select the range to loop through, but I don't know how to write a loop script to delete the rows.

Please Login or Register  to view this content.

**arlu1201** · 10-09-2012, 09:28 AM

Try this

Please Login or Register  to view this content.

**DannyJ** · 10-09-2012, 09:31 AM

Hi,

I believe this code works.

Please Login or Register  to view this content.

**AB33** · 10-09-2012, 09:48 AM

Your code is deleting any cell within the range Range("2:63").Select. You have not speccified if you wish to delete blank cells only. Arlu's code work. By the way, you have merged cells in your book. Read Joshep's advice

**kitcargray** · 10-09-2012, 10:31 AM

Dear Arlu and Danny,
Thanks so much for your help. Both codes work magnificently and I can't thank you guys enough.
You guys found the solution just minutes after I posted this, and I find this amazing. I really want to keep practicing so that one day I'll be able to do problem solving like you guys do.

Thanks much again and have a great rest of the week!!

**kitcargray** · 10-09-2012, 10:33 AM

Originally Posted by DannyJ

Hi,

I believe this code works.

Please Login or Register  to view this content.

Originally Posted by arlu1201

Try this

Please Login or Register  to view this content.

Originally Posted by AB33

Your code is deleting any cell within the range Range("2:63").Select. You have not speccified if you wish to delete blank cells only. Arlu's code work. By the way, you have merged cells in your book. Read Joshep's advice

Hi there,

Yes Arlu's code works very nicely and I am very thankful to all of you. I hope to get better at coding.

**arlu1201** · 10-09-2012, 10:36 AM

Am glad it worked.

To mark your thread as Solved, you can do the following -
Select Thread Tools-> Mark thread as Solved. I will do it for you this time.

Also, since you are relatively new to the forum, i would like to inform you that you can thank those who have helped you by clicking the small star icon located in the lower left corner of the post which helped you. This adds to the reputation of the person who has taken the time to help you.