Help: iLogic Code to Insert Prompt Title Blocks

Help: iLogic Code to Insert Prompt Title Blocks

ngdnam88
Advocate Advocate
682 Views
6 Replies
Message 1 of 7

Help: iLogic Code to Insert Prompt Title Blocks

ngdnam88
Advocate
Advocate

Hi friends,

Please help me the iLogic Code to Insert the Prompt Title Blocks into the Drawing. I tried:

 

Try
	ActiveSheet.TitleBlock = "PROMPT BORDER (1)"
Catch
End Try	

 

but the Title Block didn't inserted.

 

A001.PNG

Thanks, 

0 Likes
Accepted solutions (2)
683 Views
6 Replies
Replies (6)
Message 2 of 7

bradeneuropeArthur
Mentor
Mentor

"Border" = not "Boder"

Regards,

Arthur Knoors

Autodesk Affiliations & Links:
blue LinkedIn LogoSquare Youtube Logo Isolated on White Background


Autodesk Software:Inventor Professional 2025 | Vault Professional 2024 | Autocad Mechanical 2024
Programming Skills:Vba | Vb.net (Add ins Vault / Inventor, Applications) | I-logic
Programming Examples:
Drawing List!|
Toggle Drawing Sheet!|
Workplane Resize!|
Drawing View Locker!|
Multi Sheet to Mono Sheet!|
Drawing Weld Symbols!|
Drawing View Label Align!|
Open From Balloon!|
Model State Lock!
Posts and Ideas:
My Ideas|
Dimension Component!|
Partlist Export!|
Derive I-properties!|
Vault Prompts Via API!|
Vault Handbook/Manual!|
Drawing Toggle Sheets!|
Vault Defer Update!

! For administrative reasons, please mark a "Solution as solved" when the issue is solved !


 


EESignature

0 Likes
Message 3 of 7

bradeneuropeArthur
Mentor
Mentor

Use this piece of code to replace:

 

Dim a As DrawingDocument = ThisDrawing.Document


Dim b As TitleBlockDefinition = a.TitleBlockDefinitions.Item("PROMPT BORDER (1)")

a.ActiveSheet.TitleBlock.Delete
a.ActiveSheet.AddTitleBlock(b)

 

Regards,

Arthur Knoors

Autodesk Affiliations & Links:
blue LinkedIn LogoSquare Youtube Logo Isolated on White Background


Autodesk Software:Inventor Professional 2025 | Vault Professional 2024 | Autocad Mechanical 2024
Programming Skills:Vba | Vb.net (Add ins Vault / Inventor, Applications) | I-logic
Programming Examples:
Drawing List!|
Toggle Drawing Sheet!|
Workplane Resize!|
Drawing View Locker!|
Multi Sheet to Mono Sheet!|
Drawing Weld Symbols!|
Drawing View Label Align!|
Open From Balloon!|
Model State Lock!
Posts and Ideas:
My Ideas|
Dimension Component!|
Partlist Export!|
Derive I-properties!|
Vault Prompts Via API!|
Vault Handbook/Manual!|
Drawing Toggle Sheets!|
Vault Defer Update!

! For administrative reasons, please mark a "Solution as solved" when the issue is solved !


 


EESignature

0 Likes
Message 4 of 7

ngdnam88
Advocate
Advocate

A002.PNG

I tried your code but I got an error. Please help me. Thanks,

0 Likes
Message 5 of 7

ngdnam88
Advocate
Advocate

I forgot to give the important point: The title block that I used need to fill information to "Prompted Entry" table:

A003.PNG

 

With the normal Title Block, both of iLogic codes run perfect!

Thanks,

0 Likes
Message 6 of 7

ngdnam88
Advocate
Advocate
Accepted solution
0 Likes
Message 7 of 7

bradeneuropeArthur
Mentor
Mentor
Accepted solution

Have you checked your spell?

 

Dim a As DrawingDocument = ThisDrawing.Document


Dim b As TitleBlockDefinition = a.TitleBlockDefinitions.Item("PROMPT BODER (1)")

a.ActiveSheet.TitleBlock.Delete
a.ActiveSheet.AddTitleBlock(b)

Regards,

Arthur Knoors

Autodesk Affiliations & Links:
blue LinkedIn LogoSquare Youtube Logo Isolated on White Background


Autodesk Software:Inventor Professional 2025 | Vault Professional 2024 | Autocad Mechanical 2024
Programming Skills:Vba | Vb.net (Add ins Vault / Inventor, Applications) | I-logic
Programming Examples:
Drawing List!|
Toggle Drawing Sheet!|
Workplane Resize!|
Drawing View Locker!|
Multi Sheet to Mono Sheet!|
Drawing Weld Symbols!|
Drawing View Label Align!|
Open From Balloon!|
Model State Lock!
Posts and Ideas:
My Ideas|
Dimension Component!|
Partlist Export!|
Derive I-properties!|
Vault Prompts Via API!|
Vault Handbook/Manual!|
Drawing Toggle Sheets!|
Vault Defer Update!

! For administrative reasons, please mark a "Solution as solved" when the issue is solved !


 


EESignature

0 Likes