detectar final en excel.

[DarkSide]

Prueba con Null en vez de '':

    ...
    final:=excel.cells[fila,1].value; 
  until (final = Null)

A mi me funciono, claro que estaba trabajando con ADO, pero supongo que es lo mismo.

Saludos