I'm trying to extract information from a weldment cut list. This particular code just runs through all cut lists in a weldment/sheetmetal part and looks at the evaluated Length value. For some reason the Evaluated Value creturns a blank when I check it? The screenshot below shows the cut list properties. Not really sure what's going on here.
Any help would be greatly appreciated.
<p>Dim swApp As SldWorks.SldWorks<br>Dim swModel As SldWorks.ModelDoc2</p><p>Dim Temp As String<br>Dim bool As String</p><p>Dim swFeat As Feature</p><p>Dim eLength As String</p><p><br>Sub main()</p><p>Set swApp = Application.SldWorks<br>Set swModel = swApp.ActiveDoc<br>Set swFeat = swModel.FirstFeature<br><br>Do While Not swFeat Is Nothing<br><br>If swFeat.GetTypeName2 = "CutListFolder" Then<br><br>bool = swFeat.CustomPropertyManager.Get4("LENGTH", False, Temp, eLength)</p><p>MsgBox (eLength)<br><br>End If<br><br>Set swFeat = swFeat.GetNextFeature<br><br>Loop<br><br>End Sub</p>