Как преобазовать *.rtf в *.doc и обратно?

[Sanchezzz]

Привет всем! Подскажите пожалуйста как преобразовать файл из RTF в doc и обратно?

[GSerg]

Открыть в ворде и пересохранить?

[Sanchezzz]

это и так понятно. А программным путём как нибудь можно? Мне нужно загрузить в RichtextBox .rtf или .doc и потом сохранить в файле .rtf или .doc

[GSerg]

Программным путём через ворд конечно можно.
Через rich конечно нельзя.

[Sanchezzz]

И каким образом через ворд программно это сделать? Если я правильно понимаю для такого преобразования требуется наличие этого самого ворда на компе. А если его там нет?

[GSerg]

А если его там нет, формат rtf и не более того.

[hCORe]

На приличном компе Word есть. Но если его нет, - нужно работать напрямую со структурой .doc-файлов (см. http://www.wotsit.org)

Если Word есть, можно его поздним связыванием

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

Dim wdApp As Object
Set wdApp = CreateObject("Word.Application")

и использовать объектную модель. Или подключить в Project>References и создать объект

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

Dim wdApp As Word.Application: Set wdApp = New Word.Application

и также заюзать объектную модель. Посмотреть объектную модель при подключенной в References библиотеке можно по F2. В хелпе VBA, идущем с "Офисом", обязательно есть описание объектной модели Word.

[Sanchezzz]

Ну будем надеяться что ворд всё же присутствует . Как же преобразовать то? Объясните пожалуйста подробнее

[hCORe]

Объектная модель Word! Object Browser (F2)! Шнеллер! %)
Команды: открыть файл, сохранить как. Переведи эти названия, и получишь имена методов объекта Word.Application.

[Sanchezzz]

спасибо буду пробовать. Может что и получиться