Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
pball
in reply to: Anonymous

brendansullivan:
You can use the following code to get the sheet metal thickness. The first two lines are not needed if you it with the code above as it already has those lines.

Dim oDoc As PartDocument
Set oDoc = ThisApplication.ActiveEditDocument

Dim oSheetMetalCompDef As SheetMetalComponentDefinition
Set oSheetMetalCompDef = oDoc.ComponentDefinition

Dim thick As Double
'Inventor returns the thickness in metric so it needs converted
thick = oSheetMetalCompDef.Thickness.Value / 2.54
Check out my style edits for the Autodesk forums
pball's Autodesk Forum Style