С помощью мыши можно выделить ячейку, а можно выделить текст в ячейке полностью. Это будут два разных выделения.
Саму ячейку можно выделить таким кодом (выделяется первая ячейка в первой таблице):
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
Огромное спасибо!!! Все работает. По видимому загвоздка была в этом символе-кружке.