Word VBA Макросы: Как обратиться/выделить текст в ячейке в таблице в ворде?

Автор Посетитель, 04 ноября 2019, 20:19

Посетитель

С помощью мыши можно выделить ячейку, а можно выделить текст в ячейке полностью. Это будут два разных выделения.

Саму ячейку можно выделить таким кодом (выделяется первая ячейка в первой таблице):
ActiveDocument.Tables(1).Cell(1, 1).Select

А как выделить весь текст в ячейке при помощи VBA?

Администратор

Sub Макрос()
 
    ' Выделение первой ячейки в таблице.
    ActiveDocument.Tables(1).Cell(1, 1).Select
   
    ' Убираем с конца символ-кружок.
    Selection.MoveEnd Unit:=wdCharacter, Count:=-1
 
    ' Здесь у нас выделен весь текст ячейки.
        ' Если ячейка пустая, то вернётся символ-кружок, а не пустая строка.
        ' Вывод текста в View - Immediate Window.
    Debug.Print Selection.Text
 
End Sub

Посетитель

Огромное спасибо!!! Все работает. По видимому загвоздка была в этом символе-кружке.