okey, i used the following code :
Dim crxApp As New CRAXDRT.Application
Dim crxRpt As CRAXDRT.Report
Private Sub UserForm_Activate()
Me.Top = 1
Me.Left = 2
Me.Height = Application.Height - 5
Me.Width = Application.Width - 5
Set crxRpt = crxApp.OpenReport("C:\work\p2pengl.rpt")
CRV.Top = 2
CRV.Left = 2
CRV.Height = Application.Height - 10
CRV.Width = Application.Width - 10
CRV.ReportSource = crxRpt
CRV.ViewReport
CRV.Zoom (120)
End Sub
of course with a userform where the crystal report viewer object is placed. The Data source used by the rpt is a worksheet within the current workbook. There is no problem displaying the report itself. But when I try to close the report viewer and get back to excel, it hungs up, including the excel application.