Ага ! Есть жись на Марсе !
![Smile :)](./images/smilies/icon_smile.gif)
тем более, что у нас основной режим - это пакетная печать, т.е. шаблоны где-то там в фоновом потоке
заполняются и сразу отправляются на печать (или запись в PDF).
Модератор: Дед Пахом
Ага ! Есть жись на Марсе !
Один в один. Есть шаблон перегонки report в RTF, да простит меня автор, что не помню его мени, но оказалось проще и красивее генерить rtf независимо.
Игорь, спасибо наглядно. Не подскажите как аналогично в excel в списке добавить нужное количество строк?Игорь Столяров писал(а): ↑13 Февраль 2020, 5:41
Я всегда за то, что бы не усложнять простое.
Предположим обычный пользователь, не знакомый с работами Татьяны Суровцевой, сам нарисовал в Microsoft Word
отчёт в том виде, как он его хочет видеть (или местный ботан ему помог). Получилось как в прикреплённом примере.
Как заменить одиночные поля - козе понятно, нас интересует список. Открываем DOC(X), RTF, ODT и работаем через OLE.
...
Вставить строку после нужной - не проблема:gopstop2007 писал(а): ↑15 Февраль 2020, 20:36 Вернее какой код позволяет вставить в шаблон списка новую строку
Код: Выделить всё
ExcelObject{'Application.ActiveCell.Value'} = '' ! Затёрли найденное название шаблона
ExcelObject{'Application.Selection.Resize(' & Clip(xCurrenRow - 1) & ',1).EntireRow.Insert'}
тоже самое