VBA Named Range in A1 Offset to left And Name new Range

[Shiseiji]

Not as easy as I had hoped. If I'm forced to insert column "A:A" I can, but am hoping to use offset rather than a firm address.
Aa aways, TIA

Ron
Range ws_2Users1_LogOnID is in cell A1.

    ' Range("ws_2Users1_LogOnID").Offset(, -1).EntireColumn.Insert ' nothing happens 
    Range("ws_2Users1_LogOnID").EntireColumn.Insert 'this works
    Range("wws_2Users1_LogOnID").Offset(, -1).Name = "ws_2Users1_IsClosed"
    Range("ws_2Users1_IsClosed").Value = "Closed Account"
    Range("ws_2Users1_IsClosed").Offset(1, 0).Resize(LastRow).Name = "ws_2Users1_RngIsClosed"

 

[Fluff]

You cannot offset 1 cell to left if you are already in col A.

 

[Shiseiji]

Thanks Fluff!

 

[Fluff]

You're welcome & thanks for the feedback.