Вход | Регистрация
 
1С:Предприятие :: 1С:Предприятие 8 общая

Excel. Скопировать листы одной книги в другую.

Excel. Скопировать листы одной книги в другую.
Я
   Адинэснег
 
07.03.12 - 10:05
Выгрузил ТабличныеДокументы в файл стандартным способом:
<1> ТД.Записать(ИмяФайла, ТипФайлаТабличногоДокумента.XLS97)
<2> cоздаю Новый COMОбъект("Excel.Application")
и хочу в него скопировать листы из книг <1>
Метод Экселя не подскажите?
   Euguln
 
1 - 07.03.12 - 10:08
не поверишь 
Sheet1.Copy(Book.WorkSheets(1))
   Адинэснег
 
2 - 07.03.12 - 12:29
чот пустой лист вставляет(
   Адинэснег
 
3 - 07.03.12 - 12:38
----
....

Excel = Новый COMОбъект("Excel.Application");
Книга = Excel.WorkBooks.Add();
КнигаТемп = Excel.WorkBooks.Open(ИмяИсходногоФайла);
НовыйЛист = Книга.Sheets.Add();
НовыйЛист.Name = "Темп";
НовыйЛист.Copy(КнигаТемп.Sheets(1));
Книга.SaveAs(ИмяФайлаПриемника);

....
----
   Euguln
 
4 - 07.03.12 - 13:07
Надо наоборот
ЛистШаблона = КнигаТемп.WorkSheets(1); 
ЛистШаблона.Copy(Книга.Sheets(1));
   Адинэснег
 
5 - 07.03.12 - 13:10
(4) мерси

Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Тема не обновлялась длительное время, и была помечена как архивная. Добавление сообщений невозможно.
Но вы можете создать новую ветку и вам обязательно ответят!
Каждый час на Волшебном форуме бывает более 2000 человек.