TheSwamp
Code Red => VB(A) => Topic started by: Guest on February 06, 2008, 03:13:58 PM
-
I'm looking for a way to list the drawings that are referenced into a Sheet Set. Does anyone have any snippets they'd like to share?
Thanks in advance!
-
I'm not sure how to access sheetset stuff via VBA as I've never needed to do that.
But I did once need a simple listing of the files in a sheet set and was able to get that by selecting "Publish Dialog Box" from the Sheet Set Manager. Inside the Publish Dialog box you can save that list as a *.DSD file, which is a plain text file that lists DWG, layout name, etc.. That file is in a format that should be fairly easy to parse programatically.
-
Matt
I am working on changing the custom properties in the sheet set but I have come across code that may help you
Try this:
Make sure you set a reference to The the type library
AcSMComponents1.0 Type Library
'This example lists all sheet sets
Sub Example_SSListAll()
Dim sheetset As New sheetset
' Get the sheet set manager
Dim ssMgr As New AcSmSheetSetMgr
Dim dbIter As IAcSmEnumDatabase
Dim db As IAcSmDatabase
Set dbIter = ssMgr.GetDatabaseEnumerator
Set db = dbIter.Next
Do While Not db Is Nothing
ThisDrawing.Utility.Prompt ("----------BEGIN------------" & vbCrLf)
sheetset.List db
Set db = Nothing
Set db = dbIter.Next
ThisDrawing.Utility.Prompt ("---------- END ------------" & vbCrLf)
Loop
Set dbIter = Nothing
Set ssMgr = Nothing
ThisDrawing.Application.Update
End Sub
Also, any help with the custom properties would be appreciated!
Mark
-
Matt
I am working on changing the custom properties in the sheet set but I have come across code that may help you
Also, any help with the custom properties would be appreciated!
Mark
I found that buried in one of the folders. I've got something that is working (almost).
As for the custom properties, have you seen these?
http://www.augi.com/education/auhandouts/2005/CP15-1.pdf
http://hyperpics.blogs.com/beyond_the_ui/2004/03/vba_example_tha.html
-
Matt
I have already been threw the sheetset count and some other methods on there, however one thing did catch my eye.
I am going to print he pdf and see what I can find out
Thank you!
Did the method that I post help you with what you needed?
Mark