D
Dave Elliott
My main form is named BlankChecks and below is the on click code to open the
form BlankChecksNotclr from the main form and should close the main form
BlankChecks
but it does not close the main form, why???
On Error GoTo Err_Command145_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "BlankChecksnotclr"
DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.Close acForm, Me.Name
Exit_Command145_Click:
Exit Sub
Err_Command145_Click:
MsgBox err.Description
Resume Exit_Command145_Click
form BlankChecksNotclr from the main form and should close the main form
BlankChecks
but it does not close the main form, why???
On Error GoTo Err_Command145_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "BlankChecksnotclr"
DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.Close acForm, Me.Name
Exit_Command145_Click:
Exit Sub
Err_Command145_Click:
MsgBox err.Description
Resume Exit_Command145_Click