Обойти ограничение вставки в закладку Word - VB
Формулировка задачи:
суть дела - мне необходимо в закладку Word вставлять текст из мемо-поля приложения, для чего использую метод w.ActiveDocument.FormFields("bookmark_field").result = "" & param.Vars("App_field").Value()
предварительно был создан шаблон Word, на который ссылается обработка,в нем соотвественно созданы закладки.
принципиально все работает нормально, за исключением того что если размер текста превышает 255 символов, то вставки в закладку не происходит :-(
в свойствах закладки естественно ее размер выставлен по максимуму - 32767 символов, переменная,в которую передается значение мемо-поля также содержит в себе весь текст всегда (проверял с помощью msgbox и порсто выводом в файл всех параметров)
очень нужна помощь - в чем могут быть грабли????
PS очень подозреваю что проблема может быть в несоответствии типов данных, но пробовал переопределить переменную в массив
dim str1
Str1=String (1000)
Str1=param.Vars("App_field").Value()
не помогло...
также хочу отметить, что среды разработки как таковой нет - в приложении можно просто вставлять куски кода VBS на отчет..
предварительно был создан шаблон Word, на который ссылается обработка,в нем соотвественно созданы закладки.
принципиально все работает нормально, за исключением того что если размер текста превышает 255 символов, то вставки в закладку не происходит :-(
в свойствах закладки естественно ее размер выставлен по максимуму - 32767 символов, переменная,в которую передается значение мемо-поля также содержит в себе весь текст всегда (проверял с помощью msgbox и порсто выводом в файл всех параметров)
очень нужна помощь - в чем могут быть грабли????
PS очень подозреваю что проблема может быть в несоответствии типов данных, но пробовал переопределить переменную в массив
dim str1
Str1=String (1000)
Str1=param.Vars("App_field").Value()
не помогло...
также хочу отметить, что среды разработки как таковой нет - в приложении можно просто вставлять куски кода VBS на отчет..
Решение задачи: «Обойти ограничение вставки в закладку Word»
textual
Листинг программы
<font color="blue">Dim</font> Str Str = CStr((param.Vars(<font color="teal">"g_list"</font>).Value())) w.ActiveDocument.Tables(<font color="darkblue"><b>1</b></font>).Cell(<font color="darkblue"><b>1</b></font>,<font color="darkblue"><b>2</b></font>).Range.InsertAfter(Str)
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д