Имя: Пароль:
1C
1С v8
1с перенос в колонтитулы шаблона word
,
0 sv201
 
03.07.13
19:25
Добрый день

наткнулся на проблему при переносе данных из 1С в word почему то не заменяет значение в колонтитулах шаблона документа ворда

синтаксис

word = Новый COMОбъект("Word.Application");
word.Visible = Истина;
       
ШаблонОтчета         = АттЦентр.ШаблонИтоговыйПротоколЭкзаменов.Хранилище.Получить();
МестоХраненияШаблона = ФайловыеФункцииКлиентСервер.ПроинициализироватьПутьКРабочемуКаталогу(Кандидат);
путьКфайлуШаблона    = МестоХраненияШаблона+"Итоговый протокол экзаменов "+Строка(выборка.ПрефиксМК)+".docx";
       
ШаблонОтчета.Записать(путьКфайлуШаблона);
       
word.Documents.Open(путьКфайлуШаблона);
word.visible=истина;
word.Activate();
Документ=word.Application.Documents(1);
Документ.Activate();
       
Замена=Документ.Content.Find;
Замена.Execute("{№ЭЦ}",Ложь,Истина,Ложь,,,Истина,,Ложь, НомерАктЭЦ);
1 Мимохожий Однако
 
03.07.13
19:40
В какой строке кода ты обращаешься к колонтитулам?
2 sv201
 
03.07.13
19:42
Замена=Документ.Content.Find;
Замена.Execute("{№ЭЦ}",Ложь,Истина,Ложь,,,Истина,,Ложь, НомерАктЭЦ);
3 Мимохожий Однако
 
03.07.13
19:45
Я бы включал запись макроса и изменил бы что-нибудь в колонтитуле, а потом этот код перенёс в 1С. Мне кажется эта строка не для колонтитула.
4 sv201
 
03.07.13
19:48
так и есть это замена обычного текста в шаблоне worda
5 sv201
 
03.07.13
19:49
я вот нашел на сайте
http://help1c.com/faq/view/454.html
строку для замены текста в нижнем колонтитуле,


Документ.Sections(1).Footers(1).Range.Find.Execute("[НашаОрганизация]", Ложь, Истина, Ложь, , , Истина, , Ложь, Заказчик, 2);
6 sv201
 
03.07.13
19:50
непонятно что за параметр в этой строке отвечает за нижний или верхний колонтитул
7 Мимохожий Однако
 
03.07.13
19:52
(5)По ссылке я не увидел речь о колонтитулах.
8 sv201
 
03.07.13
19:54
все нашел задача решается с помощью следующей строки:

       документ.Sections(1).Headers(1).Range.Find.Execute("{номерЭц}", Ложь, Истина, Ложь, , , Истина, , Ложь, НомерАктЭЦ, 2);
9 sv201
 
03.07.13
19:55
Footers вставляет в нижний колонтитул
Headers вставляет в верхний колонтитул
10 Мимохожий Однако
 
03.07.13
19:57
Приятно, когда получается ))
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.