VBA To Insert Specific Column Before Every Existing Columns

[snb]

You can't add columns to a worksheet: it always contains 16384 columns.
You can move data in the worksheet though:

Sub M_snb()
   sheets("sheet1").usedrange.cut sheets("sheet1").cells(1,2)
End sub