Selection.InsertColumnsRight (Word)

Inserta columnas a la derecha de la selección actual.

Microsoft Word inserta un número de columnas igual al de la selección actual. Para poder utilizar este método, la selección actual debe estar en una tabla.

ActiveDocument.Tables(1).Columns(2).Select 
Selection.InsertColumnsRight