T
Tim McPhillips
I have written the following code and I keep getting a run
time error 1004. Can anyone help?
Sub ResizeIT()
Dim range1 As Range
Dim range2 As Range
Set range1 = Worksheets("UnitTemplate").Range("CS7")
Set range2 = range1
Range("range1").Resize(, 3).Select
Selection.EntireColumn.Insert
End Sub
I am just trying to insert some columns based on a set
range address.
Tim McPhillips
time error 1004. Can anyone help?
Sub ResizeIT()
Dim range1 As Range
Dim range2 As Range
Set range1 = Worksheets("UnitTemplate").Range("CS7")
Set range2 = range1
Range("range1").Resize(, 3).Select
Selection.EntireColumn.Insert
End Sub
I am just trying to insert some columns based on a set
range address.
Tim McPhillips