Thanks for the responses.
Murph said:
You set Doc = Application.ActiveDocument.....shouldn't Doc = AcadApplication.ActiveDocument ?
In my Main sub, I set Application=AcadApplication, so this should take care of it, I think. I have wondered if there's a problem with using variable names like "Application", but at least my declaration should take care of Murph's concern.
Keith said:
Where is your event programming? Perhaps something is wrong there.
The event programming is in the Class Module, which is (I think) where it needs to be. See the part
that says "Private Sub Doc_EndCommand(ByVal CommandName as String)". That part has been working
great in VBA as a Document event (got the initial idea from Adesk code to use the Design Center in VBA), so I don't think there's anything wrong with it. I can't even get the first line to execute, and Err.Number is 0, so I don't think this is the problem.
I have noticed that the class module (or rather my instance of it) terminates when my main sub ends. I'm now thinking that this is because I am not setting up my instance of the class in ACAD.DVB. This may be the whole problem, so I will check that out today.
Again, thanks for the responses.
Lance