Printing a Range of Invoices (Reports)

[ManuelLavesa]

Hello, as you can see I am new at programing. I would like to be able to print a range of invoices... I have OrderID and Invoice Number as unique fields for each record (invoice). So ideally I would like to enter on a form the starting Invoice Number, the ending invoice number, press a button and get all the invoices printed individually following the invoice number. Could you please help me in getting some code to do this? I was thinking of do loops, but I don't know how to implement them with the start and end invoice numbers. Thank you for your help.

[ItsMe]

The simplest would likely be to use the .Filter property of the report at the time you open the report. Here is an example using two unbound controls as user input for a date range.

If IsNull(Me.TextBoxName1) Or _
   IsNull(Me.TextBoxName2) Then
MsgBox "Please enter Criteria"
Exit Sub
End If

Dim strWhere As String
strWhere = "[MyDateField] BETWEEN #" & Me.TextBoxName1 & "# AND #" & Me.TextBoxName2 & "#"
DoCmd.OpenReport "ReportName", acViewPreview, , strWhere

If you are using numbers and going after your primary key the syntax would be a little different. You would not use the date qualifiers (#).

strWhere = "[MyPKField] BETWEEN " & Me.TextBoxName1 & " AND " & Me.TextBoxName2

[ManuelLavesa]

Thank you ItsMe. It works well

[ItsMe]

Glad to hear all is well.

[peiyezhu]

strWhere = "[MyPKField] BETWEEN # " & Me.TextBox & "#"....