10-13-2023
08:16 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
10-13-2023
08:16 AM
That worked! I just had to add in an extra "else if" statement for the assemblies. Here is what I added below in case this helps someone in the future:
If refDoc.DocumentType = DocumentTypeEnum.kPartDocumentObject Then Try oPartsList = oSheet.PartsLists(1) Catch oPartsList = oSheet.PartsLists.Add(baseView, placementPoint) End Try Else If refDoc.DocumentType = DocumentTypeEnum.kAssemblyDocumentObject Then Try oPartsList = oSheet.PartsLists(1) Catch Try oPartsList = oSheet.PartsLists.Add(baseView, placementPoint, kFirstLevelComponents) Catch oPartsList = oSheet.PartsLists.Add(baseView, placementPoint, kPartsOnly) End Try End Try End If