This might help make sense of the loop...
...it's for an Invoice form
LineItems(x, 1) = LineNumber
LineItems(x, 2) = InvNumber
LineItems(x, 3) = InvCode
LineItems(x, 4) = QOrder
LineItems(x, 5) = ItemNum
LineItems(x, 6) = Description
LineItems(x, 7) = UPrice
LineItems(x, 8) = ExtPrice...