Я новичок. Я могу показать содержимое активной ячейки. Однако я хочу показать содержимое двух ячеек справа от точки вставки.
Это мой код до сих пор. Большое спасибо заранее.
Dim oDoc As Word.Document
Dim MySelection As Word.Selection
Dim rngTable As Word.Range
oDoc = Globals.ThisAddIn.Application.ActiveDocument
MySelection = Globals.ThisAddIn.Application.Selection
If MySelection.Information(Word.WdInformation.wdWithInTable) = True Then
MySelection.SelectCell()
rngTable = MySelection.Range
rngTable.MoveEnd(Unit:=Word.WdUnits.wdCharacter, Count:=-1)
MsgBox(rngTable.Text)
Else GoTo ExitHere
End If
ExitHere:
rngTable = Nothing