Fix Problem Wall Cleanups by ensuring common base plane Utility

[richard.binning]

You might read about the following attached utility in the July edition of AUGI HotNews. It is designed to fix non planar wall endpoints.

Problem: You get a drawing that seems to defy cleanup no matter what you do to repair it.

Solution: Force all endpoint "Z" values in your drawing to "0". This will allow you to correctly cleanup your walls using traditional cleanup routines and procedures.

How to Run:


Copy the attached file to your hard-drive in a folder that already is part of your support file search path.
Create a new toolbar item or custom code palette tool.
Add the following code:
^C^C(vl-vbarun "ADTWalls2_CommonPlane.dvb!ThisDrawing.ForceWalls_toZero_Elevation") Customize your button.
Try the routine by clicking on your new tool or toolbar.

[suyoung]

You might read about the following attached utility in the July edition of AUGI HotNews. It is designed to fix non planar wall endpoints.

Problem: You get a drawing that seems to defy cleanup no matter what you do to repair it.

Solution: Force all endpoint "Z" values in your drawing to "0". This will allow you to correctly cleanup your walls using traditional cleanup routines and procedures.

How to Run:


Copy the attached file to your hard-drive in a folder that already is part of your support file search path.
Create a new toolbar item or custom code palette tool.
Add the following code:
^C^C(vl-vbarun "ADTWalls2_CommonPlane.dvb!ThisDrawing.ForceWalls_toZero_Elevation") Customize your button.
Try the routine by clicking on your new tool or toolbar.


Will this work for lines too? Lines that will not fillet because they are non-co planar?

[richard.binning]

Will this work for lines too? Lines that will not fillet because they are non-co planar?

Unfortunately, it will not.
Use the express tool flatten.

HTH

~Richard

[assaf89]

You might read about the following attached utility in the July edition of AUGI HotNews. It is designed to fix non planar wall endpoints.

Problem: You get a drawing that seems to defy cleanup no matter what you do to repair it.

Solution: Force all endpoint "Z" values in your drawing to "0". This will allow you to correctly cleanup your walls using traditional cleanup routines and procedures.

How to Run:


Copy the attached file to your hard-drive in a folder that already is part of your support file search path.
Create a new toolbar item or custom code palette tool.
Add the following code:
^C^C(vl-vbarun "ADTWalls2_CommonPlane.dvb!ThisDrawing.ForceWalls_toZero_Elevation") Customize your button.
Try the routine by clicking on your new tool or toolbar.


Could you please explain:
- support file search path
- where to add that code

thanks

Assaf

[Steve_Bennett]

This has been addressed somewhat in 2009 now (finally). See this post for more info:
http://architects-desktop.blogspot.com/2008/02/autocad-architecture-2009-part-1.html

[richard.binning]

That was a great blog post by David. Lots of information for everyone to digest.

In reply to assaf89's post,

The support file search path is found in your options dialog on the Files tab. Add you can expand the first item shown in that list and click the "add" button then browse to the folder where you placed the VBA Macro. This will add that folder to the support file search path, then the lisp command I shared will run because autocad will be able to find and load the vba macro provided.

P.S. The support file search path is also available as an environment variable named "acad"

P.S.S. I've also installed 2009 so expect an update to this vba macro in the near future. I'll post a reply when I've updated and published the 2009 version.