Columns.Last (Word)

Returns a Column object that represents the last column in a table.

Dim clmLast As Column
Set clmLast = ActiveDocument.Range.Columns.Last