Объект Cell (PowerPoint)
Представляет ячейку таблицы. Объект Cell является членом коллекции CellRange . Коллекция CellRange представляет все ячейки в указанном столбце или строке. Чтобы использовать коллекцию CellRange , используйте ключевое слово Cells .
Нельзя программно добавлять ячейки в таблицу PowerPoint или удалять их из нее. Используйте метод Add коллекций Columns или Rows , чтобы добавить столбец или строку в таблицу. Используйте метод Delete коллекций Columns или Rows , чтобы удалить столбец или строку из таблицы.
Используйте ячейку (строка, столбец), где строка — номер строки, а столбец — номер столбца, или Ячейки (индекс), где индекс — это номер ячейки в указанной строке или столбце, чтобы вернуть один объект Cell . Ячейки нумеруются слева направо в строках и сверху вниз в столбцах. При использовании языковых параметров справа налево эта схема становится обратной. В следующем примере первые две ячейки в одной строке таблицы в форме пять на слайде два объединяются.
With ActivePresentation.Slides(2).Shapes(5).Table
.Cell(1, 1).Merge MergeTo:=.Cell(1, 2)
End With
В этом примере нижняя граница для первой ячейки в первом столбце таблицы задает пунктирную линию.
With ActivePresentation.Slides(2).Shapes(5).Table.Columns(1) _
.Cells(1)
.Borders(ppBorderBottom).DashStyle = msoLineDash
End With
Используйте свойство Shapeдля доступа к объекту Shape и управления содержимым каждой ячейки. В этом примере текст в первой ячейке (строка 1, столбец 1), вставляется новый текст, а затем устанавливается ширина всего столбца в 110 точек.
With ActivePresentation.Slides(2).Shapes(5).Table.Cell(1, 1)
.Shape.TextFrame.TextRange.Delete
.Shape.TextFrame.TextRange.Text = "Rooster"
.Parent.Columns(1).Width = 110
End With
Справочник по объектной модели PowerPoint
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.