Parent property example

The following example demonstrates how to return the Parent property of the Application object.

Private Sub ParentPropExample()

     Dim myParent As Object

     Set myParent = Application.Parent

     MsgBox ("Application is: " & myParent.Name)

End Sub