Добавление столбцов Word

[uncleau]

Добрый день! Нужен макрос добавляющий в таблицу два смежных столбца слева от заданного столбца.

[viter.alex]

Если таблица без объединённых по столбцам ячеек, то добавляются так (слева от столбца, в котором стоит курсор):

With Selection
  .Tables(1).Columns.Add BeforeColumn:= .Columns.First
End With

Если же есть ячейки, объединённые по столбцам, то задача становится не тривиальной и требует индивидуального подхода.
Большего сказать нельзя ввиду скудности исходных данных

[uncleau]

Сообщение от viter.alex

Если таблица без объединённых по столбцам ячеек, то добавляются так (слева от столбца, в котором стоит курсор):

With Selection
  .Tables(1).Columns.Add BeforeColumn:= .Columns.First
End With

Если же есть ячейки, объединённые по столбцам, то задача становится не тривиальной и требует индивидуального подхода.
Большего сказать нельзя ввиду скудности исходных данных

Задача в следующем: нужно по исполнению макроса добавить 2-а столбца слева от исходного с точной копией его структуры(т.е. могут быть обьеденены несколько ячеек)