Mega Code Archive

 

Categories / VisualBasic Script / Word

 

Strip off the last two characters when assigning the Text property to a string

Sub strip()     Dim strCellText As String          strCellText = ActiveDocument.Tables(3).Rows(2).Cells(1).Range.Text     Debug.Print strCellText     strCellText = Left(strCellText, Len(strCellText) - 2)     Debug.Print strCellText End Sub