>Hi Eric,
>
>Just tried and I am still getting an error. Compile Error: Variable undefined. And the IDE highlights the AcadCircle after the Is. Here is the code.
>General Section:
>

Private MarkObject As AcadCircle
>
>Public Sub UnMark()
>    If MarkObject Is AcadCircle Then
>        MarkObject.Delete
>        Set MarkObject = Nothing
>    End If
>End Sub

Have you made a reference to the component giving you the AcadCircle type?

You can also try to use the TypeName function like this:

Private MarkObject As AcadCircle

Public Sub UnMark()
    If typename(MarkObject) = "AcadCircle" Then
        MarkObject.Delete
        Set MarkObject = Nothing
    End If
End Sub