Consultas SQL a Excel en varias hojas

[miquellg]

Hola amig@s,
Estoy implementando una aplicación donde el resultado de una AdoQuery lo envio a una hoja Excel a través de la función:

procedure DoExportFile(AExport: TDataExport; AExtencion : String; Nom:TFileName);
begin
AExport.GetFields.Assign( Fini.DBGaux.Columns );
AExport.SaveToFile(ChangeFileExt( Nom , AExtencion ) );
end;

Esto funciona bien con 1 query.
Pero ahora necesito enviar el resultado de 2 querys a 1 archivo excel, colocando cada query en una hoja diferente. Creo que no puedo hacerlo con el procedimiento anterior o si?
Se aceptan propuestas.
muchas gracias