CADForums.net

natanz · Guest

I have read through the newsgroup on this topic, but i am still at a
loss. I have written a small program that i want to run whenever a
user plots. I know the code works, but it only seems to work when it
is in a module in the active drawing. It seems like i may be missing
something about initializing events in a class module. Can someone
explain, or send me to resources where i can get even more dangerous?

thanks.

humberto · Joined: 26 Aug 2005 Posts: 6

Put this in thisdrawing model

Private Sub AcadDocument_BeginPlot(ByVal DrawingName As String)
'call your program
End Sub

Mahersy · Joined: 23 Jan 2006 Posts: 1

You could set up a class module and add this

Public WithEvents AcadApp As AcadApplication ' Use with Application

Then use the event

Private Sub AcadApp_BeginPlot(ByVal DrawingName As String)

To capture the plot.

Note: that in 2004 on if you want to capture the event background plot will have to be turned off.
To grab the object you could use the getobject method or thisdrawing.application method to set acadapp

	CADForums.net Forum Index -> VBA	All times are GMT
Page 1 of 1