![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Excel [D7]
P0tia © (2003-09-08 16:06:00)
Как узнать количество листов в рабочей книги? Как закрыть соединение с Excel? Начинается так...
Excel := GetActiveOleObject("Excel.Application");
P0tia (2003-09-08 17:53:00) [1]
я не сам создаю Рабочую книгу, а использую имеющиюся
Arm79 (2003-09-08 17:35:00) [2]
А еще неплохо было бы поработать с страницей Servers. Кстати, насчет макроса - сам пользуюсь этим методом. Очень помогает
dima_shapkin (2003-09-08 17:15:00) [3]
Для того чтобы узнать кол-во листов в книге ее как бы надо и открыть для начала, поэтому лучше создать новый OLE объект(или указатель на интерфейс).
var
WorkBook, Sheet, exl : Variant;
exl := CreateOleObject("Excel.Application");
WorkBook := exl.WorkBooks.Open("Имя файла с путем");
// Кол-во шитов
ShowMessage(IntToStr(WorkBook.Sheets.Count));
Sheet := WorkBook.WorkSheets[1]; // Первый шит
Если что не понятно записываешь макрос и смотришь как на этот е..м VB это реализуется и пытаешься все это сделать из Дельфей, все в принципе также, заисключением некотрых ньюансов.
XL := Unassigned; // типа все...