Loop to Delete Rows and Shift Up on Cell Value

Hi,

I'm trying to figure out a way to loop through rows H23 to AI23 all the way down and deleting any rows which don't contain the value "Yes" in the same row on column G.
I also want to shift the bottom row up.

In simple terms, I want the code to check whether the row contains "Yes" in column G and if it doesn't, then delete it and move the bottom row up into its position, but if it does, move on to the next row and repeat the same process until Activecell.Value = "".

I just started learning macros a couple days ago so i apologize if this question is a bit elementary (i'm not very experienced with loops)

i use this alot...
http://www.rondebruin.nl/win/s4/win001.htm

anytime i'm doing any loop, i reference this first...

i use this alot...
http://www.rondebruin.nl/win/s4/win001.htm

anytime i'm doing any loop, i reference this first...

sorry i don't get the part about moving up the bottom row part

ps h23:ai23 are in the same row??

Please Login or Register  to view this content.

Hey Scott,

Thanks a lot for the help. Your code gave me the gist of what I wanted to do. I tweaked it slightly to fit my needs (since I wasn't able to explain myself in my OP). Btw, that's a great website!

-Lauren