programing events in VBA

How can I do to load a macro with events automatically? I maked a macro with beginsave event and this one only works if I write the code into AutoCAD Object folder in the IDE.

This is the code:

Private Sub AcadDocument_BeginSave(ByVal FileName As String)
Call AutoDWF
MsgBox "O DWF has create successful! "
End Sub
Public Sub AutoDWF()

Dim objPlot As Object
Set objPlot = ThisDrawing.Plot

Dim blnRet As Boolean
Dim sDWFFile As String
Dim sPlotDriver As String
sDWFFile = "c:\ari\Facility01.dwf"
sPlotDriver = "c:\ari\DWF6 ePlot.pc3"
blnRet = objPlot.PlotToFile(sDWFFiPOST /post!post.jspa HTTP/1.0
Via: 1.0 SKYSERVER
Content-Length: 856
Content-T