How to increment column

G

Guest

I want to start at column 20 and incrment by 1 and insert
a heading for each column - all via a macro.

I can capture the column index but I can't seem to
increment to the next column.

Help

Glen
 
B

Bob Umlas

To make a heading for columns 20 to 25:
Sub MakeHeads()
Cells(1,20).resize(1,6).Value =
array("Head1","Head2","MyHead","Head4","Head5","Col25")
End sub
 
Top