из экселя в БД

[Serge_Bliznykov]

Катя, давайте так.
в Excel у Вас несколько строк и столбцов.
Вас интересует ТОЛЬКО столбец, озаглавленный "Данные" и никак иначе... При этом этот столбец может быть где угодно на листе и заголовок может быть на первой строчке, а может, например, на седьмой...
Ображив этот столбец, надо НА ОДИН СТОЛБЕЦ ЛЕВЕЕ читать, пока не встретим текст ОбъектNN (где NN - любые цифры) ?
и то, что находится в столбце "Данные" надо записать в БД ?
А БД кроме величины ещё что-то пишется
INSERT INTO Tabe1(ZNACHENIE) values (НайденнаяВеличина)
других полей нет?
Другие строчки (Объект2, Объект3 и т.д.) не интересуют?..

[dr.Chas]

у quit рабочий код, как раз то что вам нужно. Остаётся только определится с листом в книге (заранее известен или нет), подправить код и сделать добавление данных в бд, в место стинггрида.

[kate158]

to dr.Chas ок, если рабочий. еще не проверяла.
to Serge_Bliznykov Меня интересует не ТОЛЬКО столбец, озаглавленный "Данные" (в экселевской таблице несколько таких столбцов - как пример столбцы "Данные" и "Данные1")... При этом этот столбец может быть где угодно на листе и заголовок может быть на первой строчке, а может, например, на седьмой. Обнаружив этот столбец, надо читать, пока не встретим текст ОбъектNN (где NN - любые цифры) - этот столбец может быть ЛЕВЕЕ столбца "Данные" на 1,2,N столбцов. и то, что находится в столбце "Данные" надо записать в БД. Запись происходит построчно. Если Столбец имеет имя Данные - и Объект=1, пишется число из столбца "Данные" в БД соответствующее строке где есть "Объект1". Если столбец имеет имя Данные - и Объект=2, пишется число из столбца "Данные" в БД соответствующее строке где есть "Объект2" и т.д. пока не появится пустое поле в столбце Имя. фух.вот =)

[quit]

рабочий код

естественно код рабочий!
kate158, Вам нужно все таки какую то структуру определить для таблицы в Excel, иначе вам придется каждую страницу открывать и делать перебор, пример кода с перебором я Вам уже дал.

[Serge_Bliznykov]

тогда действительно, код у quit, похоже, делает как раз то, что Вам нужно (ну единственное, выкинуть работу со StrinnGrid и добавить запись в БД)

единственное, я бы искал заголовок "Данные" в той же строке, где мы нашли заголовок "Имя" (или наоборот, ищем "Имя" в той же строке, где нашли "Данные") - я не представляю себе таблицу, где заголовок строк, сдвинут относительно заголовка столбцов (ну, если заголовки не многострочные, разуммется). впрочем, это мелкие технические детали. А в целом, благодаря quit - заготовка программы у Вас уже в руках...

удачи.

[kate158]

извините меня за настойчивость..
код корректен, если данные находятся в одном месте. но ведь у меня столбец "Имя" может быть сдвинут влево от столбца "Данные"... может можно сделать добавление через 4 эдита координат ячеек с названием "Данные" и "Имя"?...

[quit]

извините меня за настойчивость..

это наоборот хорошо! главное чтобы с пользой и для вас и для нас было

код корректен, если данные находятся в одном месте. но ведь у меня столбец "Имя" может быть сдвинут влево от столбца "Данные"...

если вы посмотрите внимательно, поиск Столбца 'Данные', то увидите, что он начинается с 1го столбика до того пока не будет пусто, соответственно поиск этого заголовка столбца, даже если он будет левее, всенепременно должен осуществляться..

          while Excel.Sheets[index_sheet].Cells[1,k].Text<>'' do
          begin
          //ищем столбец
             if Excel.Sheets[index_sheet].Cells[1,k].Value = 'Данные' then
                //записываем
             inc(k);
          end;

[kate158]

это понятно. если данные начинаются со второго столбца, а у нас сначала идет проверка

while E.Sheets[1].Cells[1,f].Value <> ''
...
if (E.Sheets[1].Cells[1,f].Value = 'Имя')

то, возникнет ошибка. данные могут начинаться с любой ячейки.

[quit]

С этим согласен, проверка плохая, на что я в принципе и указал...
Сейчас рабочий день закончился, бежать надо Попробуйте в книге посмотреть на этот счет, точно не помню, но должны быть методы связанными областью страницы,которые ограничивают ее... Вам надо в эту сторону копать

[DarkEvil]

Эх не удержался, когда-то я довольно таки неплохие парсеры екселя делал,
Дак вот из своего опыта скажу что столбцы если их заполняет человек то лучше указывать вручную
=================================== ==============
Так как порой люди такой феерический бред в таблички пишут,
незнаю канешно как в Вашем случае а мне пришлось делать обработчик прайс листов
Дак вот каждый поставщик имел любимое занятия раз в неделю\месяц менять формат своего прайса
дописывать к цене ".гр","гривен","$","доларов" и тд. и тп.