I have been having this problem for months but have not followed through with a post to get it resolved:
I have an acad.rx file; in there I tpyed acvba.arx, it looks like it is initializing VBA on startup however I can not get any app events to work
I have the class module created called Class1
Public WithEvents ACADApp As AcadApplication ' Use with Application Event Examples
Sub Acad_Application_Events()
' This intializes the public variable (ACADApp) which is used
' to intercept AcadApplication Events.
'
' The VBA WithEvents statement makes it possible to intercept a generic
' object with the events associated with that object.
'
' Before you are able to trigger any of the AcadApplication events,
' you first need to run this procedure.
' You could get the application from the ThisDocument object, but that
' would require having a drawing open, so in this case it is grabbed from the system.
Set ACADApp = GetObject(, "AutoCAD.Application.16.2")
End Sub
And a module to call it up
Sub ExposeAppEvents()
Dim AppEvents As Class1
Set AppEvents = New Class1
End Sub
Still nothing
Any suggestions?
Also, does anyone have a fairly simple App Event that I can use a test?
Thanks
Mark