Is there a quick easy way to delete a user defined drawing symbol from all sheets of an IDW at one time? Without having to open each page?
Solved! Go to Solution.
Here's a real quick iLogic snippet to do this.
sName = InputBox("Enter the name of the sketched symbol to delete", "iLogic", "")
Dim myIDW As DrawingDocument
myIDW = ThisApplication.ActiveDocument
Dim oSheets As Sheets
oSheets = myIDW.sheets
Dim oSheet As Sheet
Dim oSymbol As SketchedSymbol
For Each oSheet In oSheets
For Each oSymbol In myIDW.ActiveSheet.SketchedSymbols
If oSymbol.Definition.Name = sName Then
Creating a Basic iLogic Rule
I hope this helps.
Best of luck to you in all of your Inventor pursuits,
Did you find this reply helpful ? If so please use the Accept as Solution or Kudos button below.
Tried this rule this morning and it worked great, except for the "End if" statement... there was no preceding "if". I took that line out and the code worked fine... pretty sweet actually! Thanks for sharing!