« Visual LISP example that demonstrates the use of the new API for Tables | Main | New Icon Switches in AutoCAD 2005 »


Rob Roy

Hey, awesome VBA script! Thanks for posting it. I installed it and it ran like a charm. I notice that if I add or remove a sheet to the Sheet Manager, I have to run the macro again before it recounts. No biggie, though.

Chris Duke

Hi Lee,

Tried your script in Map 2005 3D and it comes up with a type mismatch at the Set sheet = Item line. Any ideas about why it might be doing this? Cheers.



dear sir !
I am interested in Vba of autocad. But for along times, i found but i could'n find.So, can you show me how to get things.Thank alots

Mike McCall


I stumbled onto this and wanted to apply it to our stuff, however we are a MEP firm, is there anyway for this to work in separate sub catagories? For example Mechanical, Electrical, and Plumbing.


It shouldn't be a problem to step through a sheet set and figure out what drawings are under which caregories. However, you would need to create multiple different custom properties to hold the sheet count for each category, but it should be workable though.

Jon Trostad

I tried using this on AutoCAD 2007, but I get the following:
run-time error '-2147024770 (8007007e)':
Automation error
The specified module could not be found

Did I need a different code-snippet from you as well to run the thing?
this is a tool I could really use.

Lee Ambrosius

The only thing that you should need to do to get the app to run under AutoCAD 2007 is change the library reference of the Sheet Set Object. To do this, follow the instructions below:

1. Open the project in the VBA Editor
2. Click Tools > References
3. Uncheck AcSmComponents16 1.0 Type Library
4. Check AcSmComponents17 1.0 Type Library
5. Click OK
6. Run the project

P. Victor Grambsch

I am trying to adapt the SheetSet.DVB file that ships with ACAD to work with VB.

Whenever I try to create any SSM object, I get "Automation Error -- The specified module could not be found" error.

The code runs fine in VBA (both the SheetSet example from AutoCAD and my own application). Neither works in "straight" VB6, however.

Class code snippet
Private moSSM as AcSmSheetSetMgr

Public Setup()
Set moSSM = New AcSmSheetSetMgr
End Sub

The Set command generate the error. I have tried all manner of variations (like CreatObject) without success.

Any idea what is happening? Any assistance wold be appreciated.


Rerto Jordans

The blog article very surprised to me! Your writing is good. In this I learned a lot! Thank you!

The comments to this entry are closed.

My Photo

My Other Accounts

Twitter Updates

    follow me on Twitter