Report Function

[Anthony]

I have a report and I have a table with Names, when I run the report I want
the user to select a name to print from on the report in a field that I set.
How would I go about setting this up. Thanks for your help.

 

[Duane Hookom]

There is a sample of how to filter a report to the current record at
http://www.mvps.org/access/reports/rpt0002.htm. The key is to use a form that
allows the user to select the record to print. Then use the Where Condition
of the DoCmd.OpenReport method.

 

[Anthony]

How could you go about doing this?

Since Access reports are not interactive, you could use a form to allow the
user to choose the name, then a button to open the report.

 

[Duane Hookom]

Start by creating a form with a combo box to select the primary key of the
record you want to report. Then, use the command button wizard to create a
button to open your report. Edit the code created by the wizard to apply a
where condition. Your code might end up something like this depending on your
controls and report names and data type of the field.

Private Sub cmdRptCustLabels_Click()
On Error GoTo Err_cmdRptCustLabels_Click

Dim stDocName As String
Dim strWhere As String 'added

stDocName = "Customer Labels"
If Not IsNull(Me.cboName) Then
strWhere = "[NameField]='" & Me.cboName & "'"
End If
DoCmd.OpenReport stDocName, acPreview, , strWhere

Exit_cmdRptCustLabels_Click:
Exit Sub

Err_cmdRptCustLabels_Click:
MsgBox Err.Number & vbCrLf & Err.Description
Resume Exit_cmdRptCustLabels_Click

End Sub