Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

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

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

Здесь нужно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 15.10.2019, 07: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 Кб, 22 просмотров)
comp43 вне форума   Ответить с цитированием
Старый 15.10.2019, 08:54   #2
beegl
Программ Аналитик
Участник клуба
 
Аватар для beegl
 
Регистрация: 24.05.2008
Сообщений: 1,368
По умолчанию

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

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

Опции темы

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

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Работа с Excel БД в Delphi XE7 Qwerty169 БД в Delphi 8 06.12.2016 19: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 09:13


15:25.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.