Доброго времени суток, господа!
Прошу помочь, если кто сталкивался.
Имеем лист
Calc, в который в
виде значка встроен документ
WriterНеобходимо в этом встроенном документе, при помощи Basic, программно изменить текст и распечатать.
Аналогичная задача в Excel решается так:
Sub Test
Worksheet1.OLEObjects("МойДокумент").Verb Verb:=xlOpen 'командуем - открыть встроенный файл в его родном редакторе
Set objWord = GetObject(, "Word.Application") 'поскольку мы знаем заранее, что встроен вордовский файл, сразу ловим запустившийся при открытии Word
Set myDocument = objWord.ActiveDocument 'здесь ловим только что открытый документ, и можем рулить им теперь как хотим
End Sub
Поделитесь плиз, если кто пропахал этот вопрос.