Cargar desde excel

[RaulChemical]

Buenas....

Estoy haciendo una carga desde un excel:

Código Delphi [-]
var
  sFichero : String;
  Excel: Variant;
  Hoja: OleVariant;
....
begin
    try
      Excel := GetActiveOleObject('Excel.Application');
    except
      Excel := CreateOLEObject('Excel.Application');    
    end;
    Excel.Workbooks.Open(sFichero); 
    Hoja := Excel.Worksheets.Item['Hoja1'];
    Hoja.Activate;
    repeat
      Bla....
      Bla....
      Bla....
    until Nosequé = True;
End;

Bien, el caso es que si la hoja del excel no se llama 'Hoja1' me salta un pete y como son objetos OLE y Variant, no puedo acceder a sus metodos.

Como puedo hacer para saber cual es la hoja activa del Excel usando este método?
Hay algun "Hoja := Excel.Worksheets.Item[Worksheets.ActivePage];" o algo asi?


Como puedo hacer la carga usando los componentes de la pestaña servers?
Uso Delphi2006 y OficceXP y en el uses tengo la unit ExcelXP.


Nuchas gracias.


Raulete.