Table of contents
TOC
Recolher sumário
Expandir sumário

Método TextRange.Select (Editor)TextRange.Select Method (Publisher)

office 365 dev account|Última Atualização: 22/03/2018
|
2 Colaboradores

Seleciona o objeto especificado.Selects the specified object.

SintaxeSyntax

expressão. Selecioneexpression. Select

_expression_A variável que representa um objeto TextRange ._expression_A variable that represents a TextRange object.

ExemploExample

Este exemplo seleciona a célula superior esquerda de uma tabela que foi adicionada à primeira página na publicação ativa.This example selects the upper-left cell from a table that has been added to the first page in the active publication.

Dim shpTable As Shape 
Dim cllTemp As Cell 

With ActiveDocument.Pages(1).Shapes 
 Set shpTable = .AddTable(NumRows:=3, NumColumns:=3, _ 
 Left:=100, Top:=100, Width:=150, Height:=150) 
 Set cllTemp = shpTable.Table.Cells.Item(1) 
 cllTemp.Select 
End With

Este exemplo seleciona a primeira coluna de uma tabela que foi adicionada à primeira página na publicação ativa.This example selects the first column from a table that has been added to the first page in the active publication.

Dim shpTable As Shape 
Dim crTemp As CellRange 

With ActiveDocument.Pages(1).Shapes 
 Set shpTable = .AddTable(NumRows:=3, NumColumns:=3, _ 
 Left:=100, Top:=100, Width:=150, Height:=150) 
 Set crTemp = shpTable.Table.Cells(StartRow:=1, _ 
 StartColumn:=1, EndRow:=3, EndColumn:=1) 
 crTemp.Select 
End With

Este exemplo seleciona os primeiros cinco caracteres na forma um na página um da publicação ativa.This example selects the first five characters in shape one on page one of the active publication.

ActiveDocument.Pages(1).Shapes(1).TextFrame _ 
 .TextRange.Characters(1, 5).Select
© 2018 Microsoft