Private Sub Cmd9_Click()
'On Error GoTo Error_Handler
Dim Report As New Blank_rShopDrawing
4 Set Report = New Blank_rShopDrawing
Report.RecordSelectionFormula = "false"
Form1.CRViewer1.ReportSource = Report
Form1.CRViewer1.ViewReport
Form1.Show 1
Exit_Error_Handler:
Set rs = Nothing
 Exit Sub
Error_Handler:
MsgBox Err.Number & " : " & Err.Description
Resume Exit_Error_Handler
End Sub



the error in line 6 
anyhelp please 

what is the exact error message ?

Compile error - method or data member not found and the cursor waiting in line6: Form1.CRViewer1.ReportSource = Report

HibaPro, this is your 4th question about the exact same error but with a different object. Surely you must know by now how to solve this, we can not go through your (which I still suspect to be someone elses code) entire application with the same error.

Have a look at your previous threads these past 2 weeks and you will find the answer in there.

If there are no more questions on this thread, please close it off, thanx.

For any other readers, the solution can be found in the following links...

Daniweb - Here

Daniweb - and here

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.