Populate userform listbox with worksheet ending with specific name

Thank you for taking a look at this thread. Here's what I want to achieve.

1. The vba is stored in my personal A.xls.
2. Run macro "setWS".
3. The macro will launch open file dialogbox, let me select another xls file.
4. It will check the opened file and look for worksheet with name ending in "-New" regardless of upper/lowercase, e.g. A-NEW, B1-NeW, CC-New.
5. Other worksheets without the -NEW will be ignored.
   1. If there's only 1 worksheet ends with -new, then just set variable wsn to that worksheet name.
   2. If more than 1 worksheets with -new are found, then open the userform with a listbox and a select button.
   3. Populate the worksheet name in the listbox.
   4. I can either double click and select one of the worksheet name in the listbox, or single click on a worksheet, then click Select button. Both actions will do the same thing, setting the selected -New worksheet name to variable wsn.
6. Once wsn is set, close the userform, and continue with next part of the code.
7. I try to piece together the code, but this is as far as I go.

Please Login or Register  to view this content.

Try something like this.

Please Login or Register  to view this content.

Userform code

Please Login or Register  to view this content.

Thank you for replying, AlphaFrog.

After the wsn value is set, instead of passing the control to Do_Stuff_With subroutine, I would like to continue processing the next part of code in the same setWS sub. Can this be done?

The Do_Stuff_With subroutine is the next part of your code. Put the next part of your code in that procedure.