Как из textbox перенести данные в word - VB
Формулировка задачи:
Доброго времени суток, есть программа на vba 6.0, заполняются разные textbox.
Задача такая: нужно открыть шаблон word, и перенести данные из textbox в определенные закладки????
Помогиите пожалуйста, очень нужно, заранее огромное спасибо!!!
Решение задачи: «Как из textbox перенести данные в word»
textual
Листинг программы
Private Sub ВСТАВКА_ПО_МЕТКЕ(МЕТКА, ТЕКСТ) Dim R2 On Error GoTo 13 DocWord.Bookmarks(МЕТКА).Select If (DocWord.Bookmarks(МЕТКА).End - DocWord.Bookmarks(МЕТКА).Start) > 1 Then Set R2 = DocWord.Range(DocWord.Bookmarks(МЕТКА).Start + 1, DocWord.Bookmarks(МЕТКА).End) R2.Delete End If Selection.InsertBefore (" " & ТЕКСТ) Exit Sub 13 MsgBox "METKA " & МЕТКА & " NE NAYDENA!!!!!", vbCritical, "VNIMANIE!!!" End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д