Generate lists of 1×1, 2×2, 3×3 etc. in VBA (excel 2003) Posted on 2010/09/17 by admin n = Cells(1, 1) t = 1 For n = 1 To 200 For i = 1 To n Cells(t, 2) = n t = t + 1 Next i Next n