Insert column in

[Guest]

I would like a macro to insert a column (not just cells) in a named range.
The new column location would be 5 in from the last column in the range, and
it would need to have the same formulas as the column to its right.

Any help is appreciated!

 

[Guest]

maybe something like this:

Sub EFG()
Set r = Range("MyRange")
r(r.Columns.Count - 4).EntireColumn.Insert
r.Columns(r.Columns.Count - 4).Copy _
r.Columns(r.Columns.Count - 5)
End Sub

 

[Guest]

Brilliant! Thanks!!!

maybe something like this:

Sub EFG()
Set r = Range("MyRange")
r(r.Columns.Count - 4).EntireColumn.Insert
r.Columns(r.Columns.Count - 4).Copy _
r.Columns(r.Columns.Count - 5)
End Sub