Расскажите как создать многостраничный отчет Excel

[Ренат]

Доброго времени суток.
Нужно создать многостраничный отчет в Excel. Расскажите пожалуйста как это сделать. Если можно, то с примером .
Спасибо!

[m0p3e]

Многолистовой всмысле? Тогда
Ункции для работы с листом Excel
xlSetActiveSheet
xlSetActiveSheetByName
xlGetSheetName
xlSetSheetName
xlAddSheet
xlDeleteSheet
xlDeleteSheetByName
xlGetSheetsCount

[Ренат]

Ленивый я. А можно подробнее

[m0p3e]

Куда уж подробнее?

Код: Выделить всё

Внутренний счетчик
iCurSheet : Integer; xlGetSheetsCount(iCurSheet); Inc(iCurSheet);

Function AddNewSheet ( SheetName : string ) : boolean;
Begin
  AddNewSheet := true;
  If iCurSheet > 1
    Dec(iCurSheet);
   else
    If not xlAddSheet
      AddNewSheet := false;
  If AddNewSheet
    {
     xlSetSheetName ( iCurSheet, SheetName );
     If not xlSetActiveSheetByName ( SheetName )
       AddNewSheet := false;
    }
End;

как-то так...

[Ренат]

Разобрался. Все очень просто. Спасибо.