Need expert help—fast? Use the Help Bell for personalized assistance getting answers to your important questions.
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Private Sub Command1_Click()
Dim x As Object
Debug.Print TypeName(x)
Set x = Form1
Debug.Print TypeName(x)
End Sub
Good Luck
Schild