Как из 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
