Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Delphi_Excel Как создать копию раб. листа? [D7, XP]

s_t_d © (2010-02-03 12:44:00)
Уважаемые Мастера, если можно, пожалуйста подскажите. При работе приложения необходимо вывести результаты в Excel. Простейшим манипуляциям с MS_Excel (создать приложение, открыть/закрыть книгу, занести данные в ячейку) я научился. Но вот потребовальсь в открытой раб.книге создать копию раб.листа. И вот это не получается. Макрорекодер MS_Excel пишет: " Sheets("Лист1").Select Sheets("Лист1").Copy After:=Sheets(3) "... Попытка интерпретировать это в Delphi так:
v.Workbooks[wb].Worksheets[ws].Select;
v.Workbooks[wb].Worksheets[ws].Copy;
к успеху не привела... Пожалуйста посоветуйте, как быть.

s_t_d (2010-02-03 21:43:00) [1]
Добился. Вот так получилось.
v.Workbooks[wb].Worksheets[ws].Select;
v.Workbooks[wb].Worksheets[ws].Copy(After:=v.Workbooks[wb].Worksheets[ws]);
где wb - имя книги, ws - имя копируемого листа

s_t_d (2010-02-03 19:54:00) [2]
>oldman © (03.02.10 13:13) [2]
Видимо, плохо сформулировал вопрос...Но речь идет именно о СОЗДАНИИ КОПИИ раб.листа (это шаблон документа), а не о записи одних и тех же данных на разные листы...

oldman (2010-02-03 13:21:00) [3]

> Макрорекодер MS_Excel пишет: " Sheets("Лист1").Select
> Sheets("Лист1").Copy After:=Sheets(3)

Мне пишет:

Sheets("Лист1").Select
Cells.Select
Selection.Copy
Sheets.Add
Cells.Select
ActiveSheet.Paste

oldman (2010-02-03 13:13:00) [4]

> v.Workbooks[wb].Worksheets[ws].Select;
> v.Workbooks[wb].Worksheets[ws].Copy;

А где Paste?

12 (2010-02-03 13:06:00) [5]
еще раз вставить на другой лист?

Наверх

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