hanging on report open

B

benj

good day! am having a problem everytime i would open the report "repELISA1"
and "repELISA2". Access would hang, then close and send and error report.
This would only happens on the specified reports but not on the other reports.

both reports have subreports with different sources depending on criterias.

Private Sub Report_Open(cancel As Integer)
If [Forms]![FM_multiTEST1]![Frame59] = 4 Then
Me.Barangay.Visible = False
Else
Me.Barangay.Visible = True
End If
'result1
Select Case [Forms]![FM_multiTEST1]![txtSEC1]
Case "ELISA"
result1.SourceObject = "RF_sort5r1_extE"
Case "OTHER"
result1.SourceObject = "RF_sort5r1_extO"
End Select
'result2
Select Case [Forms]![FM_multiTEST1]![txtSEC2]
Case "ELISA"
result2.SourceObject = "RF_sort5r2_extE"
Case "OTHER"
result2.SourceObject = "RF_sort5r2_extO"
End Select
'result3
Select Case [Forms]![FM_multiTEST1]![txtSEC3]
Case "ELISA"
result3.SourceObject = "RF_sort5r3_extE"
Case "OTHER"
result3.SourceObject = "RF_sort5r3_extO"
End Select
'result4
Select Case [Forms]![FM_multiTEST1]![txtSEC4]
Case "ELISA"
result4.SourceObject = "RF_sort5r4_extE"
Case "OTHER"
result4.SourceObject = "RF_sort5r4_extO"
End Select
'result5
Select Case [Forms]![FM_multiTEST1]![txtSEC5]
Case "ELISA"
result5.SourceObject = "RF_sort5r5_extE"
Case "OTHER"
result5.SourceObject = "RF_sort5r5_extO"
End Select
End Sub

Thanks in advance!
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top