Re: $$Excel-Macros$$ Insert Column

Thanks Paul ... On Feb 18, 6:45 pm, Paul Schreiner wrote: > This may not be the most elegant, but it works: > Assuming that your week numbers are in row 1, then: > > Option Explicit > Sub Seq_Columns() >     Dim nCols, C >     Application.ScreenUpdating = False >     nCols = ActiveCell.SpecialCel

Re: $$Excel-Macros$$ Insert Column

This may not be the most elegant, but it works: Assuming that your week numbers are in row 1, then: Option Explicit Sub Seq_Columns()     Dim nCols, C     Application.ScreenUpdating = False     nCols = ActiveCell.SpecialCells(xlLastCell).Column     C = 2     Do While C < nCols     If (Cells(1,