| Admin |
| Отправлено: 03.02.2005, 22:14 |
|
Владимир
Группа: Администратор
Сообщений: 1190
|
Вопросы от посетителей сайта (Алексей):
Не подскажете ли как найти ячейку по содержимому или имени, а также проверить имя выделенной ячейки, и узнать координаты поименованной ячейки.
Нужно пропарсить таблицу и из нее данные перекинуть в базу. Выглядит так:
<поименованная ячейка>
[данные]
[данные]
[данные]
[данные]
...
<поименованная ячейка>
Нужно определить позиции верхней и нижней ячейики, чтобы потом между ними блок данных проанализировать.
|
|
| Aptem |
| Отправлено: 05.02.2005, 09:09 |
|
Мастер участка
Группа: Участник
Сообщений: 349
|
| CODE |
//---------------------------------------------------------------------------
Variant TForm1::GetCellValue ( Variant Sheet, int Row, int Col )
{
return Sheet.OlePropertyGet ( "Range", toText ( Row, Col ) );
}
//---------------------------------------------------------------------------
char* TForm1::toText ( int Row, int Col )
{
static char cellText[256];
cellText[0] = 'A' + Col;
sprintf ( &cellText[1], "%d", Row + 1 );
return cellText;
}
//---------------------------------------------------------------------------
|
..ну и соотвественно вызов
| CODE |
AnsiString temp = GetCellValue ( Sheet, i, j );
//i,j — координаты ячейки
|
|
|
|
