Delphi+excel

[ShingelD]

Уважаемые пользователи форума, подскажите пожалуйста, как можно определить номер последней заполненной строки в документе Excel, без анализа содержания ячеек. ( Связь с Excel ведется через COM )
Заранее благодарю !

 

[Barmutik]

Хммм.. наверно никак... по крайней мере сходу ничего не приходит ..


Да и вопрос не совсем корректен .. последняя .. считая по строке или по столбцу ?

 

[ShingelD]

Добрый день! Приятно слышать знакомые голоса!

Данные в Excel расположены в строках. Если открыть документ, то Excel точно изобразит размер маркера на левой полосе прокрутки исходя из числа видимых на экране строк и их общего числа в документе. Это наводит меня на мысль, что Excel знает номер последней строки ( и столбца ) на листе. Кто знает как из Delphi получить эту информацию от Excel, поделитесь пожалуйста.

 

[????]

Для: ShingelD

msgbox (Sheets(1).Cells(Sheets(1).[a1].CurrentRegion.Rows.Count, 1).Value)
этот код выведет массажбокс со значением последней ячейки в первом столбце первого листа.

Application.SpecialCells(xlLastCell)

это из самого Excel'а

 

[ShingelD]

Чето не идет.
Спасибо за наводку, буду пробовать ещё!

 

[Sandance]

У меня получилось так :

const
xlCellTypeLastCell = $0000000B;

...


xl_app.ActiveWorkbook.Sheets.Item[1].Cells.SpecialCells(xlCellTypeLastCell).Acti
vate;
last_row := xl_app.ActiveCell.Row