Full update attached. This will now accept shapes with or without connection points, i.e., walking glue points are OK. These are reported as "PinX". The added connection points may either be un-named or named. The report lists by page, then by 1D "connector". Each connector row lists To/From shapes and info about the connection point.
As before, there are various options that may be "activated" within the subroutine, e.g., to delete all non-connected 1D shapes. Floating connectors, i.e., just one end glued, are colored yellow for visual identification. The program will add "dots" where two or more 1-D connectors are attached to each other. If connectors are colored, their coloring is preserved.
There is ONE main macro to run, 3 subroutines in all. The main sub does all of the connectivity analysis. Info is stored in an array. The export to Excel sub is called when analysis is completed. That sub will export connection data to Excel, and then formats the worksheet. There is a new worksheet for each Visio page. The Excel window is normally not viewed, but options at end of macro can be chosen for viewing / manual saving / closing. This sub-routine will call final subroutine to import Excel formatted worksheets back into Visio.
This final macro will call back the Excel worksheet, and paste it to a new Visio background page. There is one new page per Excel worksheet, which means there is a corresponding Visio foreground page. Worksheets are on background pages which excludes them from connectivity analysis. Note, if there is a huge amount of connectivity on any given page, the Excel import may fail, i.e., get truncated. For such cases, the saved Excel file will have all information.
This connectivity analysis system should be very generic and work with most any Visio drawing...but, I've not tested the validity of that statement.
Enjoy.
Wapperdude