Свойство Cell.Selected (PowerPoint)
Возвращает значение True , если выбрана указанная ячейка таблицы. Только для чтения.
Синтаксис
expression. Выбранного
Выражение Переменная, представляющая объект Cell .
Возвращаемое значение
Boolean
Пример
В этом примере показано, как поставить границу вокруг первой ячейки в указанной таблице, если выбрана ячейка.
Sub IsCellSelected()
Dim celSelected As Cell
Set celSelected = ActivePresentation.Slides(1).Shapes(1) _
.Table.Columns(1).Cells(1)
If celSelected.Selected Then
With celSelected
.Borders(ppBorderTop).DashStyle = msoLineRoundDot
.Borders(ppBorderBottom).DashStyle = msoLineRoundDot
.Borders(ppBorderLeft).DashStyle = msoLineRoundDot
.Borders(ppBorderRight).DashStyle = msoLineRoundDot
End With
End If
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.