01-02-2024
07:22 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
01-02-2024
07:22 AM
Some items I can see incorrect are the following
- The partnumber variable was not been set but rather the excel value was been set. This has been reversed.
- ThisDoc.Document will be incorrect as it will reference the assembly. Use refDoc object if looping through assembly parts.
Not shown but if your not filtering out assemblies in your referenced documents then you will get errors. Also if any of your parts are within sub assemblies then you might also get errors. Please share the whole code if you have further issues.
For oRow = RowStart To RowEnd
If (GoExcel.CellValue("A" & oRow)) = oDocNumber Then
NewPN_1 = GoExcel.CellValue("B" & oRow)
refDoc.SaveAs(Path & NewPN_1 & ".ipt", False)
End If
Next
If this solved a problem, please click (accept) as solution.
Or if this helped you, please, click (like)
Regards
Alan
Or if this helped you, please, click (like)
Regards
Alan