Export weldament properties of each item in a cut list (VBA)

Hello, I have about 1,000 files that I need to open and export the entire weldament property list for each item in each drawing.

I found an example in the SolidWorks help files that explains how to export the properties of a specifically selected item on the cut list: 2018 SOLIDWORKS API Help - Get Custom Properties for Weldment Cut-list Item Example (VBA)​.

However, I cannot figure out how to loop through each item on the list.

Here is a screen shot of my code, highlighting in yellow the line items that I added to the original example.

Could you please help fix the code? (I am very fluent with VBA, but cannot quite figure out the SW objects.)

I have consulted:

but cannot figure out how back out the approach from those examples.

Thank you for your help!

SolidworksApi/macros