Mega Code Archive

 
Categories / VisualBasic Script / Word
 

Returning the Text within a Cell

Sub text()     Dim strCellText As String     strCellText = ActiveDocument.Tables(1).Rows(2).Cells(1).Range.Text     Debug.Print strCellText End Sub