Automate the MAPTRIM with VBA

I am trying to automate the MAPTRIM command found on Map 2002 using VBA.
Does anyone know to this is possible.

There is no command line version and I can't find an object or method that
looks correct. It must be out of luck.

 

"Mark Nelson wrote:"

That is not exposed in the ActiveX API. However, you could write your own
using the Acad API and using IntersectWith.

Good Luck,

Scott

 

Hi Mark,

You can drive the Maptrim command with a "SendCommand"

Command: filedia
Enter new value for FILEDIA <0>:
Command: _maptrim
Command: cmddia
Enter new value for CMDDIA <1>: 0
Command: _maptrim
Enter trim boundary method (Query/Select/Define):*Cancel*

From the above you can see you need to set cmddia to 0 to access the command
line input.

--


Laurie Comerford
CADApps
www.cadapps.com.au