Column.Previous (Word)

Returns the previous column in a collection of table columns.

If Selection.Information(wdWithInTable) = True Then 
 Selection.Columns(1).Previous.Select 
End If