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

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

Проблема с Excel


BKGG ©   (2003-10-28 20:57:00) 

Пожалусто подскажите как создать базу данных (таблицу, имя которого например MyTable) в Excel.


BKGG   (2003-10-29 10:25:00) [1]

Да....!! А почему же тогда нужно ODBC драивер excel-а если в excel-е не возможно создать таблицу бази данных.

Я хочу присоединиться к фаиле excel-а (в котором у меня список) с помошю ADOConnection-а и вынести етот список в DBGrid. Но для етово же нужно создать таблицу и с какой-нибудь именем. это же так или может быть я ошибаюсь.


REP   (2003-10-29 09:38:00) [2]

Andriano > Извинаюсь за неточно заданний вопрос. Я просто хочу
создать таблицу с помошю excel-а а не Delphi.

Сохрани как... в Екселе и выбери там тип файла DBF.


BKGG   (2003-10-29 09:35:00) [3]

Всем спосибо но...

aus > А у етого диапазона есть какой-нибудь имя, или может
он расположен на какой-нибудь toolbar-е, а то я не
понял о каком диапазоне с верхними ячейками разгавор.

Zokr > Я уже искал прежде чем ставить етот вопрос, но нечего не
нашол.

Andriano > Извинаюсь за неточно заданний вопрос. Я просто хочу
создать таблицу с помошю excel-а а не Delphi.


Andriano   (2003-10-29 09:03:00) [4]

Включи макрос на запись и сделай что хочешь, а потом открой макрос и посмотри как это делается.

Excel:= CreateOleObject("Excel.Application");
Excel.Visible:=False;
Excel.Workbooks.Open(shablon);
WorkSheet:=Excel.ActiveWorkbook.WorkSheets[1];
....
WorkSheet.Range[Lett(StartCol)+IntToStr(StartRow), Lett(StartCol+sl.Count-1)+IntToStr(StartRow+DataSet.RecordCount-1)].Value := XArr;
....

//А теперь именно по вопросу
Excel.ActiveWorkbook.Names.Add(RangeName, "=Лист1!$"+Lett(StartCol)+"$"+IntToStr(StartRow-1)+":$"+Lett(StartCol+sl.Count-1)+"$"+IntToStr(StartRow+DataSet.RecordCo unt-1));

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


ZoKr   (2003-10-29 06:47:00) [5]

И еще - поищи инфу на этом сайте и в yandex"е - там просто МНОГОинформации...


aus   (2003-10-29 02:01:00) [6]

выдели диапазон, у которого верхние ячейки - имена столбцов и дай этому диапазону имя MyTable.


Наверх

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