Форум: "Основная";
Поиск по всему сайту: 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.02 c
14-66670          limon                 2001-12-28 18:47  2002.02.21  
Напитки в праздники


3-66456           JEff                  2002-01-25 18:50  2002.02.21  
РЕБЯТА!!!! Выручите новичка!!!


3-66417           kriss                 2002-01-25 13:35  2002.02.21  
предлагаю работу по написанию баз данных Access с VB


1-66576           Yakudza               2002-02-05 12:49  2002.02.21  
Timestamp parameters with zero scale


4-66710           Delphimun             2001-12-22 17:37  2002.02.21  
Как сделать, чтобы моё приложение нельзя было свернуть или перейти на другую прогу?