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
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.