Can you change the order/pattern that vba uses to loop through a range?

Why would you want to use Next col in the loop?

If you only want to loop down to row 6 change the range you are looping through.

Dim col As Range
Dim cl As Range 

    For each col In  Range("A1:F6").Columns'
         For Each cl In col.Cells
              MsgBox cl.Address
          Next cl
    Next col