something like this to loop thru the query N times....
usage if looking at records on a form:
'call the ID field on the form
CreateInstallments txtID
Code:
Public Sub CreateInstallments(ByVal pvID)
Dim iNum As Integer, i As Integer
Dim sSql As String
DoCmd.SetWarnings False
iNum = DLookup("[Number of Instalments]", "input", "[id]=" & pvID)
For i = 1 To iNum
sSql = "INSERT INTO [Output] SELECT Input.* FROM [Input] WHERE (((Input.ID)=" & pvID & "))"
DoCmd.RunSQL sSql
Next
DoCmd.SetWarnings True
DoCmd.OpenTable "output"
End Sub
tho fix the SQL to match your target table.