Прямоугольники в Calc как Shapes в Excel

[maryaninov]

Доброго времени суток, уважаемые.
Надеюсь на этот раз моя тема не останется без ответа в отличии от предыдущей.
Продолжаю переводить выгрузку из Access (VBA) в Excel на выгрузку в Calc OpenOffice.
Выгрузка происходит в шаблон xlt.
Почти со всем разобрался, кроме вставки текста в прямоугольники (Shapes), которые уже существуют в шаблоне.
При выгрузке из Access в Excel это происходит по следующему коду на VBA:

Код Выделить Развернуть

Set sh = wb.ActiveSheet
sh.Shapes(2).TextFrame2.TextRange.Characters.Text = "блабла"
sh.Shapes(2).TextFrame2.TextRange.Font.Fill.ForeColor.RGB = 0
Как подобное можно реализовать при открытии xlt из VBA?

Заранее спасибо за ответы!

[rami]

Надеюсь на этот раз моя тема не останется без ответа  в отличии от предыдущей.

Никто не отвечает, потому, что непонятно что конкретно нужно, а изобретать 100500 догадок как то лень.
Выложите образцы с более подробным объяснением что есть и что надо получить.