![]() |
|
v7: из 1с в word | ☑ | ||
---|---|---|---|---|
0
NemeL
08.10.11
✎
10:50
|
Добрый день, возникла потребность вывода данных из 1с в ворд, никогда с этим не сталкивался посоветуйте где можно найти информацию, чтоб ожно было разобраться.
|
|||
1
2S
08.10.11
✎
10:53
|
на, выдрял для примера
WordApp=СоздатьОбъект("Word.Application"); WordApp.Visible = 1; NewDoc=WordApp.Documents; Док=NewDoc.Add(КаталогИБ() + "ExtForms\PrnForms\Требование.doc"); Док.FormFields("Получатель").Result = Склонять(ЛицевойСчет.ОтветственныйКвартиросъемщик, Лев(Строка(ЛицевойСчет.ОтветственныйКвартиросъемщик.Пол),1), "Д"); Док.FormFields("АдресПолучателя").Result = Строка(ЛицевойСчет.ЖилоеПомещение); Док.FormFields("Гражданин").Result = Склонять(ЛицевойСчет.ОтветственныйКвартиросъемщик, Лев(Строка(ЛицевойСчет.ОтветственныйКвартиросъемщик.Пол),1), "Т"); Док.FormFields("МесяцевЗадолженности").Result = Строка(МесяцевЗадолженности); Док.FormFields("НаДату").Result = Строка(Формат(ЗадолженностьПо+1,"Д ДДММММГГГГ")); Док.FormFields("СуммаДолга").Result = Строка(СуммаТребования) + " (" + Формат(СуммаТребования, "ЧПДС") + ")"; |
|||
2
2S
08.10.11
✎
10:54
|
только не забудь добавить реквизиты в шаблон файла
|
|||
3
Ирис_яркая
08.10.11
✎
10:54
|
о!
|
|||
4
2S
08.10.11
✎
10:58
|
(3) = (0) ?
|
|||
5
NemeL
08.10.11
✎
11:03
|
(2) а в шаблон реквизиты заполнять во в таком виде {АдресПокупателя}?
|
|||
6
2S
08.10.11
✎
11:05
|
Вставляешь текстовое поле, параметры поля (закладка) и есть его название
|
|||
7
NemeL
08.10.11
✎
11:06
|
ясно. спасибо щас попробую
|
|||
8
Cthulhu
08.10.11
✎
12:33
|
а лучше шаблон сохрани в dot-файл, и новые документы создавай по .Create(..)
|
|||
9
NemeL
08.10.11
✎
12:39
|
я так и сделал в dot, я вот только неочень пойму как передавать параметры в ворд
[CODE] Док.FormFields("Получатель").Result = Склонять(ЛицевойСчет.ОтветственныйКвартиросъемщик, Лев(Строка(ЛицевойСчет.ОтветственныйКвартиросъемщик.Пол),1), "Д"); "Получатель" - это название закладки как я понял, а вот дальше не понятно [/CODE] |
|||
10
Cthulhu
08.10.11
✎
12:46
|
//(9): типа так попробуй:
//Word=CreateObject("Word.Application"); Word.Documents.Add(тВордФайлШаблона); // тПоле - счетчик или наименование поля ... Word.ActiveDocument.Fields(тПоле).Result.Text="То, шо должно біть в етом поле"; |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |