Macro to insert BOM table and get its column to VB ListBoxes

I am looking for SolidWorks VBA that will insert Bill of Material in assembly and copy each BOM column and paste it to separate ListBox,

i.e: "Part No." to "ListBox1", "Description" to "ListBox2" ...etc

SolidworksBill Of Materials