Partager via


Cell.Selected Property (PowerPoint)

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.

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

Concepts

Cell Object Members

Cell Object