Вниз
Скачать: CL | DM;

как мониторить значения ячеек в екселе   Найти похожие ветки 

← →
Apachi   (2007-01-19 12:52) [0]

Открываю Excel
Excel1:= CreateOleObject("Excel.Application");
Excel1.Application.WorkBooks.Add;
Excel1.Application.Worksheets.Item[1].Cells[1,1]:="fffffffff";
Excel1.Visible:=true;

Затем по таимеру проверяю значение
s:=Excel1.Application.Worksheets.Item[1].Cells[1,1]

если первая ячейка заблокированна (открыта в екселе на редактирование) то праграмма вылетает так как в доступе к ячейке ей отказано

как мониторит значение ячеек???


← →
Apachi   (2007-01-19 12:58) [1]

или как узнать редактируется ячейка или нет


← →
Elen ©   (2007-01-19 13:13) [2]


> как узнать редактируется ячейка или нет

Есть в Оффисе событие для Worksheet OnChange - Occurs when cells on the worksheet are changed by the user or by an external link., его и пропиши


← →
Apachi   (2007-01-19 13:15) [3]

я TExcelApplication нормально создавать не умею
а как его создать и запустить что бы он виден был

не из главной формы
я не знаю какие параметры указывать что бы ексель виден был


← →
Elen ©   (2007-01-19 13:16) [4]

Добавлю что выгладит оно вот так :
procedure TForm1.ExcelWorksheet1Change(Sender: TObject;
 var Target: OleVariant);
begin

end;


Это если будеш ручками прописывать, но можеш посмотреть в компоненте TExcelWorksheet как это сделано


← →
Elen ©   (2007-01-19 13:18) [5]


> Apachi   (19.01.07 13:15) [3]

Не пойму вопроса?


← →
Apachi   (2007-01-19 13:20) [6]

Exel:=TExcelApplication.Create(nil);
 Exel.Workbooks.Add(null,0);
 Exel.Visible[0]:=true;

как то ексель коряво отображается
не подскажите как правильно надо запускать плииз


← →
Elen ©   (2007-01-19 13:24) [7]


> как то ексель коряво отображается
> не подскажите как правильно надо за

Коряво это как - симптомы в студию (у меня все класно запускается, только я не создаю его ручками а кидаю на форму компонентик TExcelApplication из вкладки Servers)



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

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



Память: 0.46 MB
Время: 0.035 c
2-1171980520
koha
2007-02-20 17:08
2007.03.11
передать в функцию переменную любого типа


15-1171402248
Сергей_.
2007-02-14 00:30
2007.03.11
Fortran 77


15-1171367467
Ega23
2007-02-13 14:51
2007.03.11
статья забавная


1-1169032454
Hero
2007-01-17 14:14
2007.03.11
Где найти TDXOverlay в стандартной DelphiX нет


2-1171569469
dima1233
2007-02-15 22:57
2007.03.11
Окна




   Наверх