Здравствуйте!

Поправьте в чём ошибка?
Из Delphi 7, редактирую шаблон презентации (использую ComObj), с дополнением текстового поля всё получается:

PowerPointApp.Presentations.Item(1).Slides.Item(1).Shapes.Item(2)
.TextFrame.TextRange.Characters(Start:=64, Length:=0).Text:='текст';

пустая ячейка таблицы выделяется:

PowerPointApp.Presentations.Item(1).Slides.Item(1).Shapes.Item(3)
.Table.Cell(2, 2).Select;

но не получается вставить текст в эту ячейку, ругается на "TextRange".

PowerPointApp.Presentations.Item(1).Slides.Item(1).Shapes.Item(3).Table.Cell(2, 2).TextRange.Text:='текст';

В чём причина?

Вопрос решён. Кому интересно пишите.
panov1982@yandex.ru