Loop help
 

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:


--
kola5567
------------------------------------------------------------------------
kola5567's Profile: http://www.excelforum.com/member.php...o&userid=24614
View this thread: http://www.excelforum.com/showthread...hreadid=398734

Loop help
 

Replace your code:

Code:
--------------------
Range("D18-1").Select
--------------------

with this code:

Code:
--------------------
ActiveCell.Offset(-1,0).Select
--------------------

Hope this helps,
theDude


--
theDude
------------------------------------------------------------------------
theDude's Profile: http://www.excelforum.com/member.php...o&userid=16550
View this thread: http://www.excelforum.com/showthread...hreadid=398734