hojas de excel en Delphi

[Yun-i]

Hola buenas tardes desde Veracruz Mexico

el motivo de este hilo, que no se si es el foro correcto sino pido lo ponga por favor donde deba ir es:

estoy exportando a excel desde delphi 7 algo asi:

Código Delphi [-]
var
  Excel, Libro, xlSheet, xlSheet2,xlSheet3,xlSheet4,xlSheet5: Variant;
  bGenerarArchivo: boolean;
begin
    try
     Excel := GetActiveOleObject('Excel.Application');
  except
     Excel := CreateOleObject('Excel.Application');
  end;

    Libro:= Excel.Workbooks.Open('C:\CUOTA.xlsx');

aqui creo y me contecto a mi plantilla de excel, despues quiero pasarle algo de informacion asi:

Código Delphi [-]

      case Query1.Fields[0].Value of
          1: begin
           xlSheet:= Libro.Worksheets.Item['Ernesto'];
           xlSheet.Cells.Item[col,mes]:=2000000;
            end;
          2: begin
           xlSheet2:= Libro.Worksheets.Item['Jose'];
           xlSheet2.Cells.Item[col,mes]:=2000000;
            end;

mir problema es que no puedo acceder a la hoja llamada Jose ni a las que siguen, solo puse dos en el case pero son 7. me dice que el ince no es valido

podrian ayudarme solo para acceder a las siguientes hojas??



Saludos y gracias