Поделиться через


Свойство 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

См. также

Объект Cell

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.