Community
Is there a way to keep a tally of how many times a title block is used in a drawing?
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
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")