Loop help

[kola5567]

I am trying to creat a program that will if a cell is blank, it will move up a row and keep looking for the first cell with information. I think this program would work, except I can't get the first line under Beta correct. I don't know how to tell it to move up one cell and then jump back to Alpha. Any ideas? Maybe there is an easier way I a'm not thinking of.

Alpha:

If ActiveCell.FormulaR1C1 = "=ISBLANK(RC[-3])" = True Then GoTo Beta Else GoTo Gamma

Beta:
Range("D18-1").Select
GoTo Alpha

Gamma:

[theDude]

Replace your code:

Please Login or Register  to view this content.

with this code:

Please Login or Register  to view this content.

Hope this helps,
theDude