Running a Macro or .EXE upon opening a Drawing???

[bigr1822]

Can you run macros automatically after a drawing is opened?

 

 

Thanks

 

Rodney

[CmdrDuh]

yes, what did you have in mind?

[bigr1822]

I want to write code in VBA that after a drawing is opened up, I can have AutoCAD run a Macro or an .exe to complete a task. How can I set this up?

[rocheey]

every drawing, or certain drawings?

[CmdrDuh]

You need to be more specific if you want help writing that. Otherwise, put it in thisdrawing, save it in acad.dvb

[bigr1822]

Every drawing.

[bigr1822]

I am looking at the development help doc right now and I think what I need to do is the EndOpen event???????????

[bigr1822]

I think this is exactly what I am looking for. Has anyone ever tried this?

 

 

The BeginOpen event is triggered as soon as AutoCAD receives a request to open an existing file. This request can come either interactively by a user through the File Open dialog box or programmatically.

The BeginOpen event does not trigger when opening a DXF format file.

When opening an existing file, the BeginOpen event will be followed by the EndOpen event when AutoCAD completes the opening of the drawing. For example, when a user selects File > Open, then chooses the file to open from the dialog box and selects the Open button, the BeginOpen event is triggered (as soon as the Open button is processed). Once the drawing is visible in the AutoCAD window and is ready for work, the EndOpen event is triggered.

When creating a new file, the NewDrawing event is triggered. No events will be fired while a modal dialog is being displayed.

[bigr1822]

This is exactly what I am looking for. Here is some code I found in the Devolopment help files.

 

 
Sub Example_AcadApplication_Events()
   ' This example intializes the public variable (ACADApp) which will be used
   ' to intercept AcadApplication Events
   '
   ' The VBA WithEvents statement makes it possible to intercept an generic object
   ' with the events associated with that object.
   '
   ' Before you will be able to trigger any of the AcadApplication events,
   ' you will first need to run this procedure.
   
   ' We could get the application from the ThisDocument object, but that would
   ' require having a drawing open, so we grab it from the system.
   Set ACADApp = GetObject(, "AutoCAD.Application")
End Sub

 

The problem is when I close and reopen AutoCAD, I have to run that procedure before this will work. Does anyone know how I can run the Procedure after startup?