Метод Cell.Select (Издатель)
Выбирает указанный объект.
Синтаксис
expression. Выберите
Выражение Переменная, представляющая объект Cell .
Пример
В этом примере выбирается верхняя левая ячейка из таблицы, добавленной на первую страницу активной публикации.
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
В этом примере выбирается первый столбец из таблицы, добавленной на первую страницу активной публикации.
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
В этом примере выбираются первые пять символов в форме один на первой странице активной публикации.
ActiveDocument.Pages(1).Shapes(1).TextFrame _
.TextRange.Characters(1, 5).Select
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.