Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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]

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




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

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

Наверх





Память: 0.45 MB
Время: 0.004 c
1-66546
daos
2002-02-05 07:52
2002.02.21
Событие при перемещении формы.


1-66572
Алиса
2002-02-05 15:29
2002.02.21
Глюк с while?


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


3-66482
AndrewK
2002-01-29 09:16
2002.02.21
Как составить SQL запрос


1-66589
IgoX
2002-02-05 20:37
2002.02.21
Почему так происходит





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский