A
ADB_Seeker
I searched through current posts and didn't find one that addressed my
specific issue and am hoping someone can help. I am an Access beginner so
please give specific steps and information (thanks).
I created a form that has a command button named Preview Report. This
button is supposed to display the form that is on the screen, which contains
new data.
When I click the button, it asks for the ER Number, which I input, but it
displays a blank report and not the current information in the form.
I have to save the data, exit the form, open it again, click on the
Preview Report, and enter the ER Number (a field on the form) before the
report displays the content.
What I need the Preview Report command button to do is show the current
information on the screen plus not ask for the ER Number. Following is the
code I use in the Event Procedure. Thank you in advance for your assistance.
LT
Private Sub Command114_Click()
On Error GoTo Err_Command114_Click
Dim stDocName As String
stDocName = "ER FIND REPORT"
DoCmd.OpenReport stDocName, acPreview
Exit_Command114_Click:
Exit Sub
Err_Command114_Click:
MsgBox Err.Description
Resume Exit_Command114_Click
End Sub
specific issue and am hoping someone can help. I am an Access beginner so
please give specific steps and information (thanks).
I created a form that has a command button named Preview Report. This
button is supposed to display the form that is on the screen, which contains
new data.
When I click the button, it asks for the ER Number, which I input, but it
displays a blank report and not the current information in the form.
I have to save the data, exit the form, open it again, click on the
Preview Report, and enter the ER Number (a field on the form) before the
report displays the content.
What I need the Preview Report command button to do is show the current
information on the screen plus not ask for the ER Number. Following is the
code I use in the Event Procedure. Thank you in advance for your assistance.
LT
Private Sub Command114_Click()
On Error GoTo Err_Command114_Click
Dim stDocName As String
stDocName = "ER FIND REPORT"
DoCmd.OpenReport stDocName, acPreview
Exit_Command114_Click:
Exit Sub
Err_Command114_Click:
MsgBox Err.Description
Resume Exit_Command114_Click
End Sub