Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 02.04.2011, 23:27
Аватар для Paskal
Paskal Paskal вне форума
Новичок
 
Регистрация: 28.09.2010
Сообщения: 93
Репутация: 12
Вопрос Выборка данных из Excel

Всем доброго времени суток! Такая задачка постигла мой разум.
Есть у меня прайс-лист организации, нужно выбрать все позиции из этого прайс-листа и отправить в бд сайта ну это по sql разберусь.
Может кто подскажет как указать в Delphi начало позиции и конец позиций
чтоб в исходе их хотя б в stringgird вкинуть.
Знаю в msWordOfisse можно метки ставить может и в Excel такое присутствует.
Для примера прайс в прикреплении.
Всем заранее большое спасибо.
Вложения
Тип файла: zip ср опт1.zip (133.7 Кбайт, 1 просмотров)
Ответить с цитированием
  #2  
Старый 02.04.2011, 23:53
Аватар для Konrad
Konrad Konrad вне форума
Эксперт
 
Регистрация: 19.03.2009
Сообщения: 1,261
Репутация: 45834
По умолчанию

А в экселе есть клетки
Вот в сторону их и копай.
Ответить с цитированием
  #3  
Старый 03.04.2011, 00:36
Assistant Assistant вне форума
Продвинутый
 
Регистрация: 20.02.2011
Адрес: там где правят идиоты
Сообщения: 603
Версия Delphi: 7
Репутация: выкл
По умолчанию

Код:
var
  e_app: Variant;
  rowcount, colcount: integer;
begin
............
  e_app := CreateOleObject('Excel.Application');
  e_app.WorkBooks.Open('test.xls');

  // то что Вам нужно по текущему активному листу
  rowcount := e_app.ActiveSheet.UsedRange.Rows.Count;
  colcount := e_app.ActiveSheet.UsedRange.Columns.Count;

  ..............

end;

P.S.: если я вопрос вообще правильно понял.
__________________
взялся из неоткуда, ничего не прошу, помогаю просто так
ICQ: 593977748 - стучать в случае КРАЙНЕЙ необходимости, ну, или если вы со Ставрополя

Последний раз редактировалось Assistant, 04.04.2011 в 01:43.
Ответить с цитированием
  #4  
Старый 03.04.2011, 13:34
Аватар для Paskal
Paskal Paskal вне форума
Новичок
 
Регистрация: 28.09.2010
Сообщения: 93
Репутация: 12
Радость Большое спасибо

Большое спасибо дальше сам развевать буду
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 20:19.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter