ZoomExtents and autosave

Hi,

I have a macro that makes dwf files of the drawings. Each time a drawing is
saved it first makes views, then it zooms to the extents and plots to dwf.
This works fine, only problem is when auto save is started, every 10
minutes, all these events also happen. My question is: Is there a way to go
round autosave or to manipulate autosave, so the save is made but the
drawing doesn't zoom out and the dwf and the views aren't made.

Thanks,
Frank

 

Use EndCommand instead of BeginSave or EndSave. Something along the lines of
this should work:

Private Sub AcadDocument_EndCommand(ByVal CommandName As String)
If CommandName = "QSAVE" Then
'insert code here
End If
End Sub

Tim Riley