Скачать: CL | DM;

Найти открыт ли рабочий лист Excel   Найти похожие ветки 

← →
Сергей Непочатов   (2003-09-15 10:38) [0]

Приложение на Delphi7, вывожу отчет в Excel, юзер чего-то там делает, возвращается в приложение и пытается обновить данные в отчете, а он уже может быть закрыт. Как мне определить, запущен ли Excel и открыт ли в нем мой рабочий лист?

---

← →
zaporshivets   (2003-09-15 11:25) [1]


try
ea := GetActiveOLEObject("excel.application");

по всем книгам ищещь твою по имени или по ранее сохраненному интерфейсу на нее.
// открыта книга
except
// Не открыт
end;


---

← →
Сергей Непочатов   (2003-09-15 14:07) [2]

А нельзя ли поподробнее?

---

← →
zaporshivets   (2003-09-16 10:39) [3]

Что именно подробнее? Ты лучше подробнее скажи через позднее связывание работаешь или через раннее.
Через ранее
var
iWb : Excel2000._Workbook;

for i:=1 to ExcelApp.Workbooks.Count do
begin
IWb := ExcelApp.Workbooks[i];
if IWb.Name = "ТВОЕ НУЖНОЕ ИМЯ" then КНИГА ОТКРЫТА
end;

---

← →
Сергей Непочатов   (2003-09-17 10:08) [4]

Использую ранне связывание.
Я, в общем то, так и делал, как Вы написали, но следующая проблема возникает. Если юзер случайно закроет отчет, а потом снова его откроет, то код определит, что файл открыт, а интерфейс не существует - выдаст ошибку, юзер решит, что программа работает плохо.

Уточню вопрос, как определить, что открыт файл, на который указывает интерфейс?
vWB := ExcelApplication.Workbooks.Add(ExtractFilePath(ParamStr(0)) + "nnn.xls",0);
vWS := vWB.Worksheets[1] as _Worksheet;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c