Insert specified number of columns between two named columns
2
I am trying to use VBA to insert a set number of columns between two preexisting and defined ones. However, it keeps inserting the new columns to the left of the range. I want to insert the columns within the range. Here's my VBA code to provide some context: Sub InsertNewColummnbetween() Range(Range("Data_FirstColumn").Offset(, 1), Range("Data_Net").Offset(,2)).EntireColumn. Application.DisplayAlerts = False Dim i As Integer For i = 1 To Range("Assumptions!B26").Value Columns(1).INSERT Next i Application.DisplayAlerts = True End Sub What is wrong with my commands?
microsoft-excel microsoft-excel-2010 vba
share | improve this question