forbid opening subform by itself 1

[samotek]

Can i forbid opening the subform by itself ? I want my subform to be opened only by the main form and i somebody wants to open the subform not to allow it

 

[PHV]

In the Open event procedure of the subform:

Private Sub Form_Open(Cancel As Integer)
On Error Resume Next
Dim myObj As Object
Set myObj = Me.Parent
If myObj Is Nothing Then
  MsgBox "This subform should be open only by the main form"
  Cancel = True
End If
Set myObj = Nothing
End Sub

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[samotek]

Thank you so much !