Deleting rows in Excel

[Ecniv]

Do until lngLoop>100
    if len(cells(lngLoop,6))=0 then 
       cells(lngloop,1).entirerow.delete
    else
        lngloop=lngloop+1
    end if
loop
next

Something like that. Experiment.
Please note that this should work in vba (excel), it also does need to be assigned to the right objects which you will need to set up before calling.


Vince