Printing from inside navigation form

[Thermalmonster]

I have a form which I want to print the current Record
I have used the add button/ print record / from the Design wizard menu. This works great from inside the raw form.
When I try and do it from the navigation page it consistantly only prints the first record not the current record
any ideas?

Cheers

[June7]

Review https://www.accessforums.net/forms/t...orm-32053.html

Are you actually trying to open and print a filtered report?

[azhar2006]

Simply add a command button to the viewing form and then the user can click the button on the form instead of using the built-in printing options. Most likely, you'll inhibit those options anyway. This method has one requirement: The table must include a field that contains a unique value for each record. A single-field primary key or an AutoNumber field will do nicely.


Private Sub cmdPrint_Click()
'Print current record
'using rptEmployees.
If IsNull(Me!EmployeeID) Then
MsgBox "Please select a valid record", _
vbOKOnly, "Error"
Exit Sub
End If
DoCmd.OpenReport "rptEmployees", , , _
"EmployeeID = ' " & Me!EmployeeID & " ' "
End Sub

[Thermalmonster]

Just print all of the current form

[azhar2006]

Private Sub cmdPrintPreview_Click()
Dim strReportName As String
Dim strCriteria As String
If NewRecord Then
MsgBox "bbbbbbbbbbbbb." _
, vbInformation, "nnnnnnnnnnnn"
Exit Sub
Else
strReportName = "RptInvoice"
strCriteria = "[OrderDateID]= " & Me![OrderDateID]
'strCriteria = "[lngSalespersonID]='" & Me![lngSalespersonID] & "'"
DoCmd.OpenReport strReportName, acViewPreview, , strCriteria
End If
End Sub

[Thermalmonster]

THanks for your time and efforts much appreciated

Works great