Sub t()
Dim AfterColumn As Column
Dim col(1 To 3) As Column
'добавим три столбца после первого
With ActiveDocument.Tables(1)
Set AfterColumn = .Columns(1)
Set col(1) = .Columns.Add(AfterColumn.Next)
Set col(2) = .Columns.Add(col(1).Next)
Set col(3) = .Columns.Add(col(2).Next)
col(1).Cells(1).Range.Text = "col1"
col(2).Cells(1).Range.Text = "col2"
col(3).Cells(1).Range.Text = "col3"
End With
'удалим первый добавленый
col(1).Delete
End Sub
Можно ли в макросе после инструкции GoTo (переход по коду программы) указывать переменную, если нет то как можно выйти из положения
Если Вы уже зарегистрированы на Портале - войдите в систему, если Вы еще не регистрировались - пройдите простую процедуру регистрации.