Add multiple columns in between

[NM]

Hi,

I have coulmns A through CJ and I want to add 27 coulmns before column O.
What is the easiest way to do it?

Thanks for your help.
Nee

 

[Don Guillett]

Try this idea
Sub insertcols()
mc = "o" 'tested with "d"
cti = 27 ' tested with 2
Columns(mc).Offset(, -cti).Resize(, cti).Insert
End Sub

 

[David Biddulph]

Select Column O
Shift and select Column AO
Insert/ Columns

 

[NM]

It doesn't work, its giving error!

Try this idea
Sub insertcols()
mc = "o" 'tested with "d"
cti = 27 ' tested with 2
Columns(mc).Offset(, -cti).Resize(, cti).Insert
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software
(e-mail address removed)

 

[NM]

Thanks David,it worked.

But I want to how do we know that from column O to AO it is 27 columns? Do
we count all the way from O to AO to see if that equals 27 or is there a
easier way to know that?

Thanks!

 

[Don Guillett]

Perhaps you really meant column Ao since (I should have tested with col o)
col O is column 15 and you can't subtract 27 from 15 to get -column 12

 

[Bob I]

There are 26 letters in the alphabet. 26 would get you to AP, so add one.

 

[Shane Devenshire]

Hi,

1. Type O:AO into the Name Box and press Enter
2. Press Ctrl++ (Control Plus)

Cheers,
Shane Devenshire

 

[NM]

Doesn't work for me!

Hi,

1. Type O:AO into the Name Box and press Enter
2. Press Ctrl++ (Control Plus)

Cheers,
Shane Devenshire

 

[NM]

This means it has to be done manually, excel doesn't tell you the column name
equivalent to the number.

 

[Bob I]

It would if you used R1C1 reference style instead of letters.

 

[David Biddulph]

Try Alt-I-C in place of Control Plus