Реклама на этом месте
Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
12 Дек 2017, 09:29
МультиВход
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
 
collapse

Автор Тема: Cоздание Excel afqkf по оформлению из другого файла Excel  (Прочитано 2828 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн bugs

  • *
  • Сообщений: 16
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2011-06-02
  • Сайт: 
  • Профессия: Программист 8.1
Здрасти Всем! Очень срочно нужна помощь!

Имеется отчет формирует книгу Excel.

В отчете предусмотрена фунция копирования оформления из одного файла *.xls в создаваемый файл тоже *.xls

Код в отчете:

           ПутьКШаблонам="C:\Dots_1C\КМ_ППК";
   
           Excel = Новый COMОбъект("Excel.Application");    Excel.Displayalerts = 0;//отключить встроенные предупреждения Excel
   
           // Создается новая книга на основании указаного шаблона "ОбщийРапорт.xlt"
           РабочаяКнига=Excel.Application.Workbooks.Add(ПутьКШаблонам+"\ОбщийРапорт.xlt");
   
   Открываем источник-шаблон из которого будет копироватся область оформления
   Excel.Workbooks.Open(ПутьКШаблонам+"\ШаблонОснование.xls");

           ЛистШаблон = Excel.ActiveSheet;
           
           ЛистШаблон.Range("ЭкспрессАнализ").Copy(Лист.Range(Лист.Cells(20,НомерСтолбца+1),Лист.Cells(20,НомерСтолбца+29)));
 
   Excel.visible=1;
   Excel = 0;

На данный момент выводится два файла, имеющийся файл "ШаблонОснование.xls" и созданный файл "ОбщийРапорт.xlt"


Возможно зделать так чтобы, файл "ШаблонОснование.xls" скопировал оформление и закрыл, а шаблон "ОбщийРапорт.xlt" вывести!


Оффлайн Klyacksa

  • Фрилансер. Милости прошу с задачами в личку.
  • Глобальный модератор
  • *****
  • Сообщений: 1325
  • РЕПУТАЦИЯ: 430
  • КПД: 32%
  • Регистрация: 2010-08-20
  • Сайт: 
  • Профессия: Программист 1С
Можно, например, просто спрятать ненужный файл:
Цитировать
Эксель.Visible = Видимость;
   0 - Excel не виден, 1 - виден.

Либо попробовать закрыть книгу:
      	Эксель.Application.Quit();

Правда, есть вероятность, что закроются обе. Не проверяла, но теоретически не должно.
xxx: Спасибо! Я бы загуглил, но ты интересней. Материшься. Злишься. Послать можешь...

Мысль - это оргазм мозга. Кто способен его испытать - получают истинное наслаждение, остальным приходится имитировать

Оффлайн has

  • Модератор
  • *****
  • Сообщений: 1308
  • РЕПУТАЦИЯ: 285
  • КПД: 22%
  • Регистрация: 2011-01-28
  • Сайт: 
  • Профессия: Программист 1С
Книгу можно и так закрыть
Workbook.Close

Оффлайн bugs

  • *
  • Сообщений: 16
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2011-06-02
  • Сайт: 
  • Профессия: Программист 8.1
has чпасибо помогло!

Вот так выглядит рабочий вариант

           ПутьКШаблонам="C:\Dots_1C\КМ_ППК";
   
           Excel = Новый COMОбъект("Excel.Application");    Excel.Displayalerts = 0;//отключить встроенные предупреждения Excel
   
           // Создается новая книга на основании указаного шаблона "ОбщийРапорт.xlt"
           РабочаяКнига=Excel.Application.Workbooks.Add(ПутьКШаблонам+"\ОбщийРапорт.xlt");
           Лист = РабочаяКнига.Sheets(3);
 
   
           Открываем источник-шаблон из которого будет копироватся область оформления
           ШаблонРабочаяКнига =  Excel.Workbooks.Open(ПутьКШаблонам+"\ШаблонОснование.xls");

           ЛистШаблон = ШаблонРабочаяКнига.ActiveSheet; // В это файле один лист
           
           ЛистШаблон.Range("ЭкспрессАнализ").Copy(Лист.Range(Лист.Cells(20,НомерСтолбца+1),Лист.Cells(20,НомерСтолбца+29)));
           ШаблонРабочаяКнига.Close();

 
           Excel.visible=1;
           Excel = 0;



Klyacksa, фунция которая ты предложила она полностью завершает работу Excel, следовательно закрываются все обе книги!

Все спасибо за помощь!


Теги:
 

Автозаполнение поля табличной части документа при изменении другого поля табличной части документа

Автор dimanpspРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 17
Просмотров: 3992
Последний ответ 02 Июн 2015, 15:53
от dimanpsp
Заполнение табл. части документа из табл. части другого документа

Автор WillРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 11
Просмотров: 7565
Последний ответ 16 Авг 2012, 21:50
от Will
Возможно ли получение эталонного файла конфигурации *.cf из измененной стандартной, например (УТ 11.1, БП 3.0) или вопрос о том как убрать лишние доработки и привести конфигурацию базы максимально к стандартной после варварских "доработок"?

Автор kostyaomskРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 9
Просмотров: 9159
Последний ответ 30 Дек 2015, 22:14
от 1Cnastroika
автозаполнение элемента формы документа при заполнении другого элемента формы документа

Автор mahaidorРаздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 3
Просмотров: 3643
Последний ответ 06 Апр 2014, 18:26
от sadovod
автозаполнение элемента формы документа при заполнении другого элемента формы документа

Автор nc1318Раздел Конфигурирование, программирование в "1С - Предприятие 8"

Ответов: 1
Просмотров: 131
Последний ответ 22 Ноя 2017, 14:29
от alex0402

* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Реклама

* Последние вакансии

* Топ 10 авторов за месяц

Геннадий ОбьГЭС Геннадий ОбьГЭС
167 Сообщений
ilyay ilyay
75 Сообщений
oleg-x
55 Сообщений
alex0402
46 Сообщений
andron81_81
42 Сообщений
AIFrame
37 Сообщений
MuI_I_Ika MuI_I_Ika
31 Сообщений
BuhRust
29 Сообщений
Golickoff Golickoff
28 Сообщений
Dima Dddd Dima Dddd
26 Сообщений

* Кто онлайн

  • Точка Гостей: 659
  • Точка Скрытых: 0
  • Точка Пользователей: 14
  • Точка Сейчас на форуме:

* Облако тэгов

* Форум 1С с мобильного

* Инструменты

* Дополнительно

Поиск

 
SimplePortal 2.3.5 © 2008-2012, SimplePortal