Hi there
I have the following on a form:
- 1 main form
- 1 subform
- 1 other subform (this subform has just informative information for the user)
- 1 command button (opening a complex report
Here now my problem:
- Due to the complexity of the report (report is a dynamic heading report based on a crosstab), opening this report may take up to 5 minutes. Therefore I would like to include an ActiveX ProgressBar on the form where the command button to open the report is included.
- The report should only be shown as shown when the ActiveX Progress Bar is full.
- which codes (if possible with a sample) have to be added where on the form. Im am really lost on this issue.
FYI, Here the current code of the command button:
Private Sub ZuBericht_Click()
On Error GoTo Err_ZuBericht_Click
Dim stDocName As String
stDocName = "Bericht"
DoCmd.OpenReport stDocName, acPreview
Exit_ZuBericht_Click:
Exit Sub
Err_ZuBericht_Click:
MsgBox Err.Description
Resume Exit_ZuBericht_Click
End Sub
Thank you so much in advance for your help on this very tricky issue.
Stefan.
I have the following on a form:
- 1 main form
- 1 subform
- 1 other subform (this subform has just informative information for the user)
- 1 command button (opening a complex report
Here now my problem:
- Due to the complexity of the report (report is a dynamic heading report based on a crosstab), opening this report may take up to 5 minutes. Therefore I would like to include an ActiveX ProgressBar on the form where the command button to open the report is included.
- The report should only be shown as shown when the ActiveX Progress Bar is full.
- which codes (if possible with a sample) have to be added where on the form. Im am really lost on this issue.
FYI, Here the current code of the command button:
Private Sub ZuBericht_Click()
On Error GoTo Err_ZuBericht_Click
Dim stDocName As String
stDocName = "Bericht"
DoCmd.OpenReport stDocName, acPreview
Exit_ZuBericht_Click:
Exit Sub
Err_ZuBericht_Click:
MsgBox Err.Description
Resume Exit_ZuBericht_Click
End Sub
Thank you so much in advance for your help on this very tricky issue.
Stefan.