Как узнать количество листов в Excel

← →
P0tia © (2003-09-09 10:21) [0]

Лисков а не книг, в файле к которому ты потключаешься.

← →
sniknik © (2003-09-09 10:45) [1]

один из способов
ADOConnection1.ConnectionString:= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\BookName.xls;Extended Properties=Excel 8.0;Persist Security Info=False";
ADOConnection1.LoginPrompt:= false;
ADOConnection1.GetTableNames(SL);
SL.Count < - оно
SL это TStrings должен существовать.
это смотря как подключаешся, может это и не пойдет, (если через сервера(OLE) то смотри их свойства)

← →
P0tia © (2003-09-09 10:50) [2]

я подключаюсь так:
Excel := GetActiveOleObject("Excel.Application");

Во ты задрал своим GetActiveOleObject.

Excel := GetActiveOleObject("Excel.Application");
ShowMessage(IntToStr(Excel.Sheets.Count));

Как узнать количество листов в Excel Найти похожие ветки