Inventor General Discussion

Reply
Valued Contributor
schae235
Posts: 60
Registered: ‎05-24-2011
Message 1 of 4 (147 Views)

Title Block

147 Views, 3 Replies
08-23-2012 09:16 AM

Is there a way to keep a tally of how many times a title block is used in a drawing?

INV 2012 SP1
Windows 7 64 Bit
ATI FirePro V5800
14.0 GB RAM
*Pro
jletcher
Posts: 1,946
Registered: ‎05-18-2011
Message 2 of 4 (136 Views)

Re: Title Block

08-23-2012 10:50 AM in reply to: schae235

If they are the same I think an ilogic code can count them not sure but just for me why would someone need this.

 

Never know may learn something new.

 

 Thanks


Please mark this response as "Accept as Solution" if it answers your question.

James Letcher
2012 Factory Design Suite ( will not load 2013)
What happen to my Inventor :-(
Valued Contributor
schae235
Posts: 60
Registered: ‎05-24-2011
Message 3 of 4 (128 Views)

Re: Title Block

08-23-2012 11:21 AM in reply to: jletcher

Long story short because of QA.

INV 2012 SP1
Windows 7 64 Bit
ATI FirePro V5800
14.0 GB RAM
Product Support
innovatenate
Posts: 671
Registered: ‎11-22-2011
Message 4 of 4 (77 Views)

Re: Title Block

08-31-2012 12:23 PM in reply to: schae235

You may try some iLogic code like the following. This code prints out the name of the Title Block used on each sheet. 

 

iLogic Code:

Dim oDoc As Document = ThisApplication.ActiveDocument 
Dim oDrgDoc As DrawingDocument = oDoc
Dim oSheetCount As Integer = oDrgDoc.Sheets.Count
Dim msg As String()
ReDim msg(oSheetCount)
Dim i As Integer 

For i = 1 To oSheetCount
    msg(i)= oDrgDoc.Sheets(i).TitleBlock.Name
    msgString = msgString & Chr(13) & "Sheet " & i & "" & msg(i) 
Next

MsgBox (msgString, ,"TitleBlocks Used")


Nathan Chandler


You are not logged in.

Log into access your profile, ask and answer questions, share ideas and more. Haven't signed up yet? Register

Announcements
Are you familiar with the Autodesk Expert Elites? The Expert Elite program is made up of customers that help other customers by sharing knowledge and exemplifying an engaging style of collaboration. To learn more, please visit our Expert Elite website.

Need installation help?

Start with some of our most frequented solutions to get help installing your software.

Ask the Community


Inventor Exchange Apps

Created by the community for the community, Autodesk Exchange Apps for Autodesk Inventor helps you achieve greater speed, accuracy, and automation from concept to manufacturing.

Connect with Inventor

Twitter

Facebook

Blogs

Pinterest

Youtube