Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];




Вниз

Как найти последнюю ячейку с данными в EXCEL 


Nikita   (2002-02-06 13:08) [0]

Допустим имеем следующий образец записей в файле EXCEL:

4566 test mail
xxx xxx
tes2
xxx ____

Надо определить ячейку, которая для примера подчеркнута,
т.е. определить поледнюю полосу с данными по горизонтали
и вертикали таблцы. Вызов процедуры поиска данной ячейки
будет просходить из Delphi 5.
Каким способом это можно сделать?
(Если можно - с примером).

Заранее спасибо!



KSergey   (2002-02-06 13:37) [1]

Примера под рукой нет, к тому же не понятно о примере чего идет речь: пример нужен на VBA, на Delphi при условии подключения к MS Ecxel как к COM-объекту или еще чего
Если про COM-объект речь, то вроде можно просто перебрать св-ство Cell[], дойдя по первой пустой ячейки...



Nikita   (2002-02-06 13:44) [2]

Объект OLE.
До первой пустой - не подойдет.
Будет использоваться для импорта данных и некоторые значения могут быть нулевыми (пустые ячейки).



USAtyj   (2002-02-06 15:22) [3]

Данный код переходит на последнюю редактируемую ячейку.
Равноценно нажатию Ctrl-End на листе Excel.

const
xlLastCell = 11;
var
Excel:Variant;
begin
Excel:=CreateOLEObject("Excel.Application");
...
Excel.ActiveWorkbook.ActiveCell.SpecialCells(xlLastCell).Select;
...
end;



Nikita   (2002-02-06 16:36) [4]

Большое спасибо!!!!!!!!




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.023 c
14-66675          VID                   2001-12-30 21:08  2002.02.21  
Техника ломается!


6-66643           Jaya1                 2001-11-30 20:15  2002.02.21  
ASP or ISAPI


3-66438           XX                    2002-01-27 12:25  2002.02.21  
Как сделать поиск по DBGRID?


6-66640           Ihor                  2001-11-30 17:58  2002.02.21  
Версия ВинСок.


3-66425           serg_s                2002-01-25 16:55  2002.02.21  
Прерывание ассинхронного выполнеия TADOStoredProc