7
Касандер
14.05.08
✎
18:57
|
Может это поможет: 1. Разбей программно строку на Пункт1,Пункт2,Пункт3; 2. Создай шаблон документа: 3. В нём, после абзацев или с новой строки [Пункт1],[Пункт2],[Пункт3] и т.д. 4. В модуле формы документа: // Вывод удостоверения на печать Word = CreateObject("Word.Application"); Word.Visible = 0; WordDoc = Word.Documents; Docum = WordDoc.Add(КаталогИБ()+"Подкаталог\Шаблон.dot"); // замени на свой Cont = Docum.Content; Cont.Find.Execute("[Пункт1]",0,0,,,,,,,Пункт1,2); Cont.Find.Execute("[Пункт2]",0,0,,,,,,,Пункт2,2); Cont.Find.Execute("[Пункт3]",0,0,,,,,,,Пункт3,2); Word.Visible = 1; Word.Activate(); Активизировать("кнпСнова",1);
|
|