Adding Columns in Excel Sheet

[Dhiraj]

I wish to add 4 columns in an Excel Sheet on the click of a button. Can
anyone suggest or help me in doing the same ?

[Vasant Nanavati]

An Excel sheet has 256 columns; no more and no less. You can't add 4
columns.

--

Vasant


"Dhiraj" <Dhiraj@discussions.microsoft.com> wrote in message
news:61D94B97-8180-4DF6-85F4-B8B596741DBC@microsoft.com...
>I wish to add 4 columns in an Excel Sheet on the click of a button. Can
> anyone suggest or help me in doing the same ?

[phoffre@gmail.com]

Vasant is right: you can't "Add" collumns. But if you mean "Insert"
collumns, you can do some this like this:

Sub InsCol()
Columns("E:H").Insert Shift:=xlToRight
End Sub

This will insert 4 collumns before collumn E.