- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
last option could be:
this allows you to edit the Content Center part;
ThisApplication._LibraryDocumentModifiable = True
Don't forget to set it back to false for the Application
with:
ThisApplication._LibraryDocumentModifiable = false
Completed Code:
Dim fileName As String
Dim path As String
path = ThisDoc.WorkspacePath()
fileName = "filename"
ThisApplication._LibraryDocumentModifiable = True
ThisDoc.Document.SaveAs(path & "\" & "900C7H" & L_1 & ".ipt" , False)
doc = ThisDoc.Document
path_and_name = ThisDoc.PathAndFileName(False) ' without extension
iLogicVb.UpdateWhenDone = True
MessageBox.Show("Your file has been made", "SPACER")
ThisApplication._LibraryDocumentModifiable = false
Regards,
Arthur Knoors
Autodesk Affiliations:
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: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 !