Objeto Selection (Publisher)
Representa a seleção atual em uma janela ou um painel. Uma seleção representa uma área selecionada (ou destacada) na publicação ou representa o cursor se nada na publicação está selecionado. Só pode haver um objeto Selection por painel de janela de publicação e somente um objeto Selection em todo o aplicativo pode estar ativo.
Comentários
Use a propriedade Document.Selection para retornar o objeto Selection . Se nenhum qualificador de objeto é usado com a propriedade Selection, o Microsoft Publisher retornará a seleção do painel ativo da janela da publicação ativa.
Exemplo
O exemplo a seguir copia a seleção atual da publicação ativa.
Sub CopySelection()
Selection.ShapeRange.Copy
End Sub
O exemplo a seguir determina qual tipo de item está selecionado e, se for um autoshape, preenche a primeira forma na seleção com cor. Este exemplo pressupõe que há pelo menos um item selecionado na publicação ativa.
Sub SelectedShape()
If Selection.Type = pbSelectionShape Then
Selection.ShapeRange.Item(1).Fill.ForeColor _
.RGB = RGB(Red:=200, Green:=20, Blue:=255)
End If
End Sub
O exemplo a seguir copia a seleção e a cola na primeira forma da segunda página da publicação ativa.
Sub CopyPasteSelection()
Selection.TextRange.Copy
With ActiveDocument.Pages(2).Shapes(1).TextFrame.TextRange
.Collapse Direction:=pbCollapseEnd
.InsertAfter NewText:=vbLf
.Paste
End With
End Sub
Métodos
Propriedades
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.