Inputbox in Access Report to open only once

[rmarsh57]

I generate a report using a parameter to filter records. Sometimes there's one record, sometimes many more.
I have inputboxes display so the user can enter data specific to that filter, not to each record. The user only needs to enter data once per filter.
However, the inputbox displays once per record in the filter.
How would I limit the inputbox to open once and only once per filter?
Thanks in advance for your help.

[NeoPa]

Normally it would anyway, but there are ways to complicate it, of course.

You haven't shown us what you're trying.

[rmarsh57]

Hope this helps explain. (First time using BYTE)
I've attached 5 snips.

The inputbox functions.jpg shows the 2 input functions I used. The problem is I only want them to open once when I run the report, regardless of how many records that particular salesperson has.

The parameter.jpg is where I filter to only one salesperson.

The recoverable draw.jpg and enter previous.jpg are the inputboxes I want to open only once. These reflect a number charged once a month, not on each sale.

The result.jpg is the outcome we expect, however, if the salesperson has 10 records, the input boxes open 10 times each, and since there are 2 inputboxes we have to click OK or cancel 20 times.

[PhilOfWalton]

you might like to have a look at https://bytes.com/topic/access/answe...filter-reports
Here a form opens to input all the parameters in one go and generates the report.

Although in this example shows 2 combo ranges and 2 text ranges, I was too lazy to program the second combo & text box as they weren't needed

Phil

[ADezii]

InputBoxes are not the path to take but if you insist on this approach and wish to be prompted for Parameters only once, then you can use the WhereCondition Argument of the OpenReport() Method. As an example, I am prompting for State and Zip Code Values prior to Opening a Report on Employees in the Northwind Sample Database. These 2 prompts will only appear once:

Dim strState As String
Dim strZip As String
 
strState = InputBox$("Enter State")
strZip = InputBox$("Enter 5-digit Zip Code")
 
If strState <> "" And strZip <> "" And IsNumeric(strZip) Then
  DoCmd.OpenReport "rptEmployees", acViewPreview, , "[State/Province]='" & strState & _
                               "' AND [Zip/Postal Code] = '" & strZip & "'", acWindowNormal
End If
 

[NeoPa]

Your answer was very full, but what I was looking for was how these items were used in the code.

You can see from some of the other answers that simply popping up an inputBox is often not the smoothest, or even easiest, way to approach this. Why the InputBoxes recur though, will be found in the code you invoke them with.

Certainly though, Example Filtering on a Form has information that will help do it all in a more straightforward way.