Вывод в Word

[Vasy]

Добрый день!
Сразу прошу прощения если попал не в тот форум.

Может быть кто-нибудь поможет. Из программы на VB формирую файл в Microsoft Word. Вывожу в начале строки, а затем таблицу. Но почему в Word весь текст помещается в таблицу.

wDoc.Application.Selection.TypeText Text:= “Строка»
wDoc.Application.Selection.TypeParagraph
….
wTable.Cell(i, 2).Range.Text = “в первый столбец"
wTable.Cell(i, 2).Range.Text = “во второй столбец"

Может, что-нибудь забыл написать, что бы разбить текст?

[Stail]

Добрый день!
Сразу прошу прощения если попал не в тот форум.

Может быть кто-нибудь поможет. Из программы на VB формирую файл в Microsoft Word. Вывожу в начале строки, а затем таблицу. Но почему в Word весь текст помещается в таблицу.

wDoc.Application.Selection.TypeText Text:= “Строка»
wDoc.Application.Selection.TypeParagraph
….
wTable.Cell(i, 2).Range.Text = “в первый столбец"
wTable.Cell(i, 2).Range.Text = “во второй столбец"

Может, что-нибудь забыл написать, что бы разбить текст?

--------------------------------------------------------------------------------------
Если я тебя правильно понимаю, то ты хочешь експортировать текст из своей проги в MS Word! Если так, то вот тебе код:

Код: Выделить всё

Set x = CreateObject("Word.Application")
x.Documents.Add
x.Selection.TypeText Text:="Здесь твой текст или указываешь например Form1.text1, чтобы текст из TextBoxa напичатался в Worde"
x.Visible = True


Если несовсем понял вот скачай, я тут тебе набросал как ето работает!

[Vasy]

Нет. у меня проблема в том, что при печати в Word из программы на Visual Basic, печатается текст, а при добавлении таблицы, весь текст стирается и добавляется только таблица. т.е. вропос: как из программы на VB вывести и текст и таблицу.

[Георгий]

Поиграйся с диапазонами Range. Имхо, одно просто затирает другое.
Или я вопрос не понял...