Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перенос данных таблицы в Excel [D5, Access]


Nil ©   (2003-01-05 04:34:00) 

Необходимо определить адрес последней ячейки при переносе данных таблицы в Excel. Знаем адрес первой ячейки A1, букву второго столбца B(столбцов всего 2 - это известно)и количество записей (k). Подскажите пожалуйста!!!


Nil   (2003-01-08 11:24:00) [1]

Спасибо! Все получилось!


Чекако   (2003-01-05 11:01:00) [2]

Извиняюсь вместо AddressLocal - Address
xlsheet.cells(2,rowNom+k).Address(RowAbsolute:=False)

Ест-но нужно код переделать из VBА в Pascal


Чекако   (2003-01-05 10:59:00) [3]

Какой адрес первой ячейки ты знаешь? Если тебе известны номер строки rowNom прибавь к ним кол-во записей.
Затем смотри

xlsheet.cells(2,rowNom+k).AddressLocal(RowAbsolute:=False)

Ест-но нужно код переделать из VBА в Pascal


Nil   (2003-01-05 06:36:00) [4]

Мне не нужно найти последний столбец(я его знаю-B);
мне нужен адрес последней ячейки, куда заносятся данные.
Но все равно спасибо за совет!


Чекако   (2003-01-05 06:11:00) [5]

cells(R,256).end(xltoleft).column
Для нахождения последнего столбца


Чекако   (2003-01-05 05:56:00) [6]

Dim XEnd As Long,xlSheet As Excel.Worksheet
.....
XEnd = xlSheet.Cells(65536, 1).End(xlUp).Row
это фрагмент кода макроса на VBA, переделай под Delphi


Наверх

Титульная страница Поиск, карта сайта Написать письмо