Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > VB6 > вопрос про экспорт в word


Автор: Гость_Nox 11.10.2005, 18:17
Dim WordApp As Word.Application ' экземпляр приложения
Dim DocWord As Word.Document ' экземпляр документа

' создаем документ word
Set WordApp = New Word.Application
WordApp.Visible = True
Set DocWord = WordApp.Documents.Add
DocWord.Activate

' Рисуем таблицу
Set TableWord = DocWord.Tables.Add(DocWord.Application.Selection.Range, 3, 3)

' вставляем текст в ячейку 2, 2
TableWord.Cell(2, 2).Range.Text = "Текст"


Как вставить текст под таблицей ?
затем после текста, нарисовать следующую таблицу?

smile smile

Автор: amt 15.10.2005, 21:14
Сам не пробовал, но по-моему при вставке таблицы, под ней образуется пустая строка. и тебе просто нужно использовать команду перехода на строчки вверх или вниз. Я когдато программно вставлял в документ Word текст, преобразовывал его в таблицу и никаких проблем небыло.
Может я чето не понял? - пиши.
Почему бы тебе не зарегестрироваться???

Автор: Гость_Nox 16.10.2005, 07:02
я разобрался, все вопрос снят.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)