Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.10.2019, 06:44   #1
comp43
Новичок
Джуниор
 
Регистрация: 19.05.2009
Сообщений: 1
По умолчанию Работа с Excel в Delphi

Помогите пжлста с решением!
Программа написана на Delphi7. Программа сначала обращается к одному документу Excel, добавляет столбец и вставляет в его "шапку" текст-название. Потом обращается ко второму документу Excel, считывает данные с ячеек. После этого эти данные необходимо внести в ячейки вставленного столбца 1-го документа Excel. На 1-м документе добавляет столбец со сдвигом столбцов вправо, вставляет в его шапку текст-название, после обращается ко 2-му документу, все действия производит. Но когда снова обращается к 1-му документу Excel -вставленный столбец с шапкой-названием "исчезает" и данные вставляются в столбец, оказавшийся на его месте. И вставленными оказываются только данные последней строчки(например должны вставится 3 строчки(ячейки в столбце друг под другом)), а вставляется только последняя строчка в указанную ячейку.

// Работа с 1-м документом

d:=10;
ExlApp.ActiveSheet.Columns[d].Select;
ExlApp.ActiveSheet.Columns[d].Insert(Shift:=xlToRight,CopyOrigin :=xlFormatFromLeftOrAbove);
ExlApp.ActiveSheet.Cells[1,d]:='Кол-во откликов';

// Работа со 2-м документом
s:=ExlApp.Workbooks.Open(XLSFile2). WorkSheets.Item[1].Cells[1,4];

//Вставка данных в 1-й документ

ExlApp.Workbooks.Open(XLSFile1).Wor kSheets.Item[1].Cells[2,10]:=s;
ExlApp.Workbooks.Open(XLSFile1).Wor kSheets.Item[1].Cells[3,10]:=s;
ExlApp.Workbooks.Open(XLSFile1).Wor kSheets.Item[1].Cells[4,10]:=s;
Вложения
Тип файла: 7z Открытие 2х и обращение к 2-м документам Excel.7z (692.0 Кб, 27 просмотров)
comp43 вне форума Ответить с цитированием
Старый 15.10.2019, 07:54   #2
beegl
instagram
Участник клуба
 
Аватар для beegl
 
Регистрация: 24.05.2008
Сообщений: 1,453
По умолчанию

Цитата:
Сообщение от comp43 Посмотреть сообщение
обращается к одному документу Excel, добавляет столбец и вставляет в его "шапку" текст-название. Потом обращается ко второму документу Excel, считывает данные с ячеек. После этого эти данные необходимо внести в ячейки вставленного столбца 1-го документа Excel. На 1-м документе добавляет столбец со сдвигом столбцов вправо, вставляет в его шапку текст-название, после обращается ко 2-му документу, все действия производит. Но когда снова обращается к 1-му документу Excel -вставленный столбец с шапкой-названием "исчезает" и данные вставляются в столбец, оказавшийся на его месте. И вставленными оказываются только данные последней строчки(например должны вставится 3 строчки(ячейки в столбце друг под другом)), а вставляется только последняя строчка в указанную ячейку.
можно с этим: EMS Advanced Excel Report

или с этим: FlexCelVCL
beegl вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

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

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Работа с Excel БД в Delphi XE7 Qwerty169 БД в Delphi 8 06.12.2016 18:46
Работа с Excel в Delphi KyTuH Общие вопросы Delphi 1 29.05.2013 06:26
Delphi работа с Excel all_is_fear Помощь студентам 5 17.07.2012 18:31
Delphi 7 работа с Excel Alkifr Помощь студентам 0 30.10.2010 00:31
Работа с Excel из под Delphi. S_Yevgeniy Помощь студентам 0 08.12.2009 08:13