Compartilhar via


Propriedade Cell.Selected (PowerPoint)

Retorna True se a célula da tabela especificada está selecionada. Somente leitura.

Sintaxe

expressão. Selecionado

Expressão Uma variável que representa um objeto Cell .

Valor de retorno

Booliano

Exemplo

Este exemplo coloca uma borda em torno da primeira célula da tabela especificada, se a célula estiver selecionada.

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

Confira também

Objeto Cell

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.