topic Re: Call VBA by lisp in VBA Forum

Call VBA by lisp

Anonymous — Fri, 18 May 2007 04:41:25 GMT

Hi,

I have inserted the following lisp instructions in to my acad2007.lsp file
to load a VBA file automatically.

My problem is, every time I open a new DWG file the lisp is trying to reload
the VBA file, is there any way to load the VBA just once when AutoCAD
starts?
Is there any better way to do this in lieu of using lisp?

(princ)
(defun S::STARTUP()
(command "_VBALOAD" "E:/ENGINEERING FOLDER/001-Ready/004-CAD
IMPORTANT/01-CADUTIL.dvb")
)

Thanks in advance.

Re: Call VBA by lisp

Anonymous — Fri, 18 May 2007 08:36:37 GMT

Hi,

This question gets asked and answered in this NG at least once every couple
of weeks.

The optimum method is not to load the VBA programs till they are needed.
You do this with VL_VBARUN as shown below.

(princ)
(defun RunMyMacro()
(VL_VBARUN" "E:/ENGINEERING FOLDER/001-Ready/004-CAD
IMPORTANT/01-CADUTIL.dvb!MyMacro")
)

VL_VBARUN checks if the program is loaded and if necessary loads it, the
runs the called macro.

--

Laurie Comerford
CADApps
www.cadapps.com.au
www.civil3Dtools.com
--

Laurie Comerford
CADApps
www.cadapps.com.au
www.civil3Dtools.com
"2007-User" wrote in message
news:5590013@discussion.autodesk.com...
Hi,

I have inserted the following lisp instructions in to my acad2007.lsp file
to load a VBA file automatically.

My problem is, every time I open a new DWG file the lisp is trying to reload
the VBA file, is there any way to load the VBA just once when AutoCAD
starts?
Is there any better way to do this in lieu of using lisp?

(princ)
(defun S::STARTUP()
(command "_VBALOAD" "E:/ENGINEERING FOLDER/001-Ready/004-CAD
IMPORTANT/01-CADUTIL.dvb")
)

Thanks in advance.

Re: Call VBA by lisp

Ed__Jobe — Fri, 18 May 2007 14:28:04 GMT

Also, check the value of ACADLISPASDOC.

Re: Call VBA by lisp

Anonymous — Fri, 18 May 2007 21:50:28 GMT

Thanks Laurie,

So the final format should be like:

(princ)
(defun RunMyMacro()
(VL_VBARUN" "E:/ENGINEERING FOLDER/001-Ready/004-CAD
IMPORTANT/01-CADUTIL.dvb!Starter")
)

The Starter is a module from the same DVB file which has been loaded am I
right? as a matter of fact I have tried this and is not working did I miss
anything?

Thank you.

======================================================================================
"Laurie Comerford" wrote in message
news:5590133@discussion.autodesk.com...
Hi,

This question gets asked and answered in this NG at least once every couple
of weeks.

The optimum method is not to load the VBA programs till they are needed.
You do this with VL_VBARUN as shown below.

(princ)
(defun RunMyMacro()
(VL_VBARUN" "E:/ENGINEERING FOLDER/001-Ready/004-CAD
IMPORTANT/01-CADUTIL.dvb!MyMacro")
)

VL_VBARUN checks if the program is loaded and if necessary loads it, the
runs the called macro.

--

Laurie Comerford
CADApps
www.cadapps.com.au
www.civil3Dtools.com
--

Laurie Comerford
CADApps
www.cadapps.com.au
www.civil3Dtools.com
"2007-User" wrote in message
news:5590013@discussion.autodesk.com...
Hi,

I have inserted the following lisp instructions in to my acad2007.lsp file
to load a VBA file automatically.

My problem is, every time I open a new DWG file the lisp is trying to reload
the VBA file, is there any way to load the VBA just once when AutoCAD
starts?
Is there any better way to do this in lieu of using lisp?

(princ)
(defun S::STARTUP()
(command "_VBALOAD" "E:/ENGINEERING FOLDER/001-Ready/004-CAD
IMPORTANT/01-CADUTIL.dvb")
)

Thanks in advance.

Re: Call VBA by lisp

Ed__Jobe — Mon, 21 May 2007 14:35:27 GMT

That still isn't going to prevent it from loading at every drawing opening if you are loading the lisp with every drawing. There are two types of autoloading lisp files, acad.lsp and acaddoc.lsp. acad.lsp loads once when the app starts and acaddoc.lsp loads with every dwg...Except if you've set ACADLSPASDOC to 1. Then everything loads with every dwg.