Страница 1 из 1

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

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

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

Добавлено: 10 окт 2008, 18:06
Ренат
:smile: Ленивый я. А можно подробнее *Saint-Nicolas*

Добавлено: 10 окт 2008, 20:32
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;
как-то так...

Добавлено: 14 окт 2008, 12:06
Ренат
Разобрался. Все очень просто. Спасибо.