If Me.cad_app Is Nothing Then Me.cad_app = New AcadApplicationClass Me.cad_app.Visible = True Me.cad_doc = cad_app.ActiveDocument Debug.WriteLine("Create New AutoCAD Application") Else Me.cad_doc = cad_app.ActiveDocument Debug.WriteLine("Get AutoCAD Application") End If