Use this in a module
Code:Sub InsertColumnsAtN() Dim lngCol As Long For lngCol = 289 To 7 Step -6 ActiveSheet.Columns(lngCol).Insert Next lngCol End Sub
Use this in a module
Code:Sub InsertColumnsAtN() Dim lngCol As Long For lngCol = 289 To 7 Step -6 ActiveSheet.Columns(lngCol).Insert Next lngCol End Sub
A dream is not something you see when you are asleep, but something you strive for when you are awake.
It's usually a bad idea to say that something can't be done.
The difference between dream and aim, is that one requires soundless sleep to see and the other requires sleepless efforts to achieve
Join us at Facebook
Bookmarks