Вопрос № 26944: Эксперты расскажите как из VB Запустить Word вставить в документ таблицу n*m и выгрузить в нее данные. Спасибо....
Вопрос № 26.944
Эксперты расскажите как из VB Запустить Word вставить в документ таблицу n*m и выгрузить в нее данные. Спасибо.
Отправлен: 27.09.2005, 23:23
Вопрос задал: Максим (статус: Посетитель)
Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Кобцев Д.А.
Здравствуйте, Максим!
Посмотрите здесь: http://www.vbstreets.ru/VB/Articles/65941.aspx
Там все подробно описано.
Ответ отправил: Кобцев Д.А. (статус: 1-ый класс)
Отправлен: 28.09.2005, 08:13
Отвечает: Александр Шевченко
Здравствуйте, Максим!
Для Microsoft Word 2003 это примерно так:
Приложение:
Ответ отправил: Александр Шевченко (статус: 3-ий класс)
Отправлен: 28.09.2005, 09:38
Отвечает: Miklucho
Здравствуйте, Максим!
Для работы с Вордом необходимо сначало подключить библиотеку Microsoft Word xx.x Object Library (меню Project->References->выбрать Microsoft Word xx.x Object Library->Ok). А затем, я думаю все пояснит следующий пример:
Dim wrdApp As Word.Application
Private Sub Form_Load()
Set wrdApp = New Word.Application
End Sub
Private Sub Command2_Click()
'
' зaпиcaть тeкcт из Rich Textbox (или другого окна ввода) в буфep oбмeнa
Clipboard.SetText RichTextBox1.TextRTF, vbCFRTF
' зaпиcaть тeкcт в Word
With Word.Application
.Documents.Add ' нoвый дoкумeнт
.Selection.Paste ' вcтaвить
.ActiveDocument.SaveAs App.Path & "RTFDOC2.doc", wdFormatDocument 'сохранить фaйл на диск
.Visible = True
.Activate ' cдeлaть дoкумeнт aктивным и видимым
End With
End Sub
А вот насчет таблицы не знаю, извини.
Ответ отправил: Miklucho (статус: Студент)
Отправлен: 28.09.2005, 19:30