Selection.InsertColumnsRight (Word)

Insère des colonnes à droite de la sélection active.

Microsoft Word insère le même nombre de colonnes que dans la sélection active. Cette méthode n’est accessible que si l’élément sélectionné figure dans un tableau.

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