Share via


Cell.Selected Property

PowerPoint Developer Reference

Returns True if the specified table cell is selected. Read-only.

Syntax

expression.Selected

expression   A variable that represents a Cell object.

Return Value
Boolean

Example

This example puts a border around the first cell in the specified table if the cell is selected.

Visual Basic for Applications
  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

See Also