Can anyone Help on My Print Problem
i have created a report on Query details based for print purpose
they details are:
Query Names : Customer Credit Transactions, Customer Credit Transactions Filter
Form Name : Customer Credit Transactions
Report: : 'CustomerCreditTransactionsReport' this report created above Query Details based.
So now i need to print from Form: Customer Credit Transactions i have a created a Print command and given below VBA Code for print purpose
------------------------------------------------------------------
Private Sub Print_Click()
' This code created by Command Button Wizard.
On Error GoTo Err_Print_Click
Dim strDocName As String
strDocName = "CustomerCreditTransactionsReport"
' Print Invoice report, using Invoice Filter query to print
' invoice for current order.
DoCmd.OpenReport strDocName, acViewNormal, "Customer Credit Transactions Filter"
Exit_Print_Click:
Exit Sub
Err_Print_Click:
' If action was cancelled by the user, don't display an error message.
Const conErrDoCmdCancelled = 2501
If (Err = conErrDoCmdCancelled) Then
Resume Exit_Print_Click
Else
MsgBox Err.Description
Resume Exit_Print_Click
End If
End Sub
-----------------------------------------------------------------------
so above code is working is good but all details are come's into print out pages. i need to Print only which i selected the customer details. I have attached the Form & report screen shots can anyone replay how to do changes.
--
Sandhya
i have created a report on Query details based for print purpose
they details are:
Query Names : Customer Credit Transactions, Customer Credit Transactions Filter
Form Name : Customer Credit Transactions
Report: : 'CustomerCreditTransactionsReport' this report created above Query Details based.
So now i need to print from Form: Customer Credit Transactions i have a created a Print command and given below VBA Code for print purpose
------------------------------------------------------------------
Private Sub Print_Click()
' This code created by Command Button Wizard.
On Error GoTo Err_Print_Click
Dim strDocName As String
strDocName = "CustomerCreditTransactionsReport"
' Print Invoice report, using Invoice Filter query to print
' invoice for current order.
DoCmd.OpenReport strDocName, acViewNormal, "Customer Credit Transactions Filter"
Exit_Print_Click:
Exit Sub
Err_Print_Click:
' If action was cancelled by the user, don't display an error message.
Const conErrDoCmdCancelled = 2501
If (Err = conErrDoCmdCancelled) Then
Resume Exit_Print_Click
Else
MsgBox Err.Description
Resume Exit_Print_Click
End If
End Sub
-----------------------------------------------------------------------
so above code is working is good but all details are come's into print out pages. i need to Print only which i selected the customer details. I have attached the Form & report screen shots can anyone replay how to do changes.
--
Sandhya
Last edited: