Ver Mensaje Individual
  #1  
Antiguo 19-07-2011
Veelicus Veelicus is offline
Registrado
NULL
 
Registrado: jul 2011
Posts: 5
Reputación: 0
Veelicus Va por buen camino
Thumbs down Eliminar la ultima hoja de un excel

Hola,

Estoy creando un documento excel con una hoja por cada consulta que ejecuto, puedo ejecutar de 1 a 7 consultas en función de ciertos variables.
El caso es que haga lo que haga siempre me crea una Hoja de mas, y me gustaria saber como eliminar esta ultima hoja.

Ahora mismo para crear las hojas la hago de esta manera:
Código Delphi [-]

While..... do
Begin

XLApp.ActiveWorkBook.Worksheets.Add(EmptyParam, XLApp.ActiveWorkBook.ActiveSheet, EmptyParam ,EmptyParam, lcid);        
Hoja := XLApp.Worksheets.Item[v_Pestana] as _WorkSheet;
... Logica de cada hoja
End;

y la grabacion a disco:

      XLApp.ActiveWorkbook.SaveAs( NomFich + '.xls',
         EmptyParam, EmptyParam, EmptyParam,
         EmptyParam, EmptyParam, xlNoChange,
         EmptyParam, EmptyParam, EmptyParam,
         EmptyParam, EmptyParam, 0);

Muchas gracias a todos por vuestra ayuda.
Responder Con Cita