Inventor VBA - Get Extrusion Size

[isocam]

Can anybody help?

Does any body know, using a VBA macro, to get the size of an extruded part and display it in a message box?

For example,

I have created a single sketch and extruded it to a certain size,

All I need, for testing purposes, is to get the extrusion size and display it in a message box.

Many thanks in advance!

Darren

[Frederick_Law]

https://help.autodesk.com/view/INVNTOR/2023/ENU/?guid=GUID-F445506E-065E-445A-BC17-FCD52CDC4D5E

https://help.autodesk.com/view/INVNTOR/2023/ENU/?guid=GUID-657E3523-CF9A-40D5-8BAB-064C499D5D94

[Curtis_Waguespack]

Hi @isocam 

In addition to the previous reply if you know the parameter name you can use something like this:

Dim oUOM As UnitsOfMeasure = ThisDoc.Document.UnitsOfMeasure
oInvUnits = UnitsTypeEnum.kCentimeterLengthUnits
oConversion = oUOM.ConvertUnits(1, oUOM.LengthUnits, oInvUnits)

For Each oParam In Feature.InventorFeature("Extrusion3").Parameters
	If oParam.name = "Len" Then
		MsgBox(oParam.Name & " is " & oParam.Value / oConversion & " long")
		Exit For
	End If
Next