При управлении Power Point из Excel не получается выравнивание в ячейках таблицы - VB

Формулировка задачи:

Добрый день!
Спасибо, что обратили внимание на мой вопрос!
Я автоматизирую выгрузку отчетов в PowerPoint по данным, находящимся в книге Excel.
Никак не получается сделать выравнивание текста в ячейках по центру.
Пробовала так:
komp - имя презентации Power Point

CWW = GetObject(komp)

 .Slides()
.Shapes.AddTable NumRows:=, NumColumns:=, Left:=, Top:=, :=, Height:=

 .Shapes().Table
.Cell(,).Shape.TextFrame.TextRange.ParagraphFormat.Alignment = ppAlignCenter

.Rows().
 Selection.ShapeRange.Align msoAlignCenters, False

Прочитала все возможные справки про Align и Alignment - не помогло :-( В книжках, которые у меня есть, очень мало написано про объектную модель PowerPoint.
Буду очень благодарна за любую помощь!
Спасибо!

Решение задачи: «При управлении Power Point из Excel не получается выравнивание в ячейках таблицы»

textual
                            Листинг программы 
                        
                            .Cell(<font color="darkblue"><b>1</b></font>, <font color="darkblue"><b>3</b></font>).Shape.TextFrame.TextRange.ParagraphFormat.Alignment = <font color="darkblue"><b>2</b></font>