Can't get click event to work.

I am fairly new to macro automation. I am trying to make a userform that will dynamically create listboxes based on a few factors. I can't seem to get the click event to work on the macro. Can someone take a look at the code and tell me where I am going wrong? Also any suggestions on cleaning up the code, better organizing it would help. I seem to also have an issue with it not fully closing out the word object.

Thanks in advance,

Chris C

SolidworksApi macros