Ever wanted to try to insert multiple columns just by typing in a number? It is possible using Macros in Excel!

Plus you also get to learn some programming tricks along the way, how cool is that?

Make sure your Excel has the Developer Tab enabled following this tutorial.

I explain how you can do this below step by step!

What does it do?

Asks for a number of columns, then inserts it to the right of your selected cell

Copy Source Code:


Sub InsertMultipleColumns()

Dim numColumns As Integer
Dim counter As Integer

'Select the current column
ActiveCell.EntireColumn.Select
On Error GoTo Last
numColumns = InputBox("Enter number of columns to insert", "Insert Columns")

'Keep on insert columns until we reach the desired number
For counter = 1 To numColumns
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromRightorAbove
Next counter
Last: Exit Sub
End Sub

Final Result: 

Insert Multiple Columns using Macros

Exercise Workbook:

YouTube video
How to Insert Multiple Columns Using Macros in Excel | MyExcelOnline

DOWNLOAD EXCEL WORKBOOK


STEP 1: Go to Developer > Code > Visual Basic

Insert Multiple Columns using Macros

 

STEP 2: Paste in your code and Select Save. Close the window afterwards.

Insert Multiple Columns using Macros

 

STEP 3: Let us test it out!

Select any cell that you want to insert columns on. Go to Developer > Code > Macros

Insert Multiple Columns using Macros

Make sure your macro is selected. Click Run.

Insert Multiple Columns using Macros

We want to insert 3 columns. Type in 3.

Insert Multiple Columns using Macros

With that, you are now able to insert multiple columns using macros!

Insert Multiple Columns using Macros

 

How to Insert Multiple Columns Using Macros in Excel

 

101 Macros Book

HELPFUL RESOURCES:

JOIN OUR FREE EXCEL COURSES BELOW
Click here to access these FREE Excel courses!

 

If you like this Excel tip, please share itEmail this to someone

email

Pin on Pinterest

Pinterest

Share on Facebook

Facebook

Tweet about this on Twitter

Twitter

Share on LinkedIn

Linkedin