Code for print report select from list box

[Sokkheng]

I have create list box (lstReport) that get the list of reports name from table report. now i create a command button for print the report that i select from the list report
DoCmd.PrintOut me.lstReport
But it not working, what problem with my code.
Thanks for any command.

 

[Gasman]

Why not Google for the syntax?

How to automatically print out an Access Report using VBA – Creative Connections

Our vision is to provide cost effective, time saving, secure and reliable software solutions that enable our customers to maximise their investment in technology – allowing them to focus on what they do best.

www.creativeconnections.co.uk

DoCmd.OpenReport method (Access)

Office VBA reference topic

learn.microsoft.com

DoCmd.OutputTo method (Access)

Office VBA reference topic

learn.microsoft.com

 

[theDBguy]

Can you tell us what error message you're getting?

 

[apr pillai]

Try out this Code with changes:

Private Sub Command4_Click()
Dim j As Integer
Dim strReport As String

For j = 0 To List2.ListCount - 1
 If List2.Selected(j) Then
    strReport = List2.Column(0, j)
    DoCmd.OpenReport strReport, acViewReport
 End If
Next
End Sub

 

[Sokkheng]

thanks for reply, for preview report is ok, it have problem only for print report when i click it do nothing.

 

[Pat Hartman]

It is difficult enough to debug code we can see but virtually impossible when the code is invisible.