- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Hi,
I have a code snippet exporting Excel. I have described the standard iProperties. I would like to export the "Custom" property "Welding" which is in part files and has a yes or no value.
.......
bRows = oBOMView.BOMRows For Each bRow In bRows Dim rDoc As Document rDoc = bRow.ComponentDefinitions.Item(1).Document Dim docPropertySet As PropertySet docPropertySet = rDoc.PropertySets.Item("Design Tracking Properties") xlWorksheet.Range("A" & row).Value = bRow.ItemNumber xlWorksheet.Range("C" & row).Value = docPropertySet.Item("Part Number").Value xlWorksheet.Range("D" & row).Value = docPropertySet.Item("Description").Value xlWorksheet.Range("E" & row).Value = bRow.ItemQuantity xlWorksheet.Range("F" & row).Value = docPropertySet.Item("Vendor").Value xlWorksheet.Range("P" & row).Value = docPropertySet.Item("Cost").Value
E
Solved! Go to Solution.