macro not working on coworker computer

I am trying to build a macro for my department. The problem is, it works for my computer but not for my coworkers. She receives a "Subscript out of range" message. I am having issues pinpointing the problem since it works fine on my computer. My goal is to be able to send this file to any user and have them run the macro smoothly. I created the macro with a form control in the developer tab and built the script from there.

Things that I've already checked for include:
-same version of Excel
-"Enable macros" is clicked
-shared folder location is accurate (Since it pops open on mine as well)
-Sheet name does exist (since it runs on mine)

any help is appreciated. please see code below:

Please Login or Register  to view this content.

To further Arkadi's comment about other open Workbooks, this line:

Please Login or Register  to view this content.

is a dangerous assumption for the code to make that the desired Workbook is at index 1. If it is not, then "Sheets("Sheet Name").Select" and "Sheets("table").Select" could fail.

Thanks Norie. That one seemed to resolve the issue for another coworker, but I will test it out on the coworker with issue. Guess I need to get better at declaring variables...much appreciated