Macro to check bingo wins

I am trying to expedite the process of checking bingo numbers output from a random string against a pre-made bingo card. The way this system works is I have one file with all of the random number strings associated with the name of the person each string was output for. I then have to copy and paste each string into a separate worksheet and run a macro to check and see if the person won a bingo. I was wondering if there was any way to expedite this process. For example, if I could just run a single macro to check all strings associated with a name that generated a new spreadsheet (or even a text file) detailing who won and how close the losers were. Also, I am currently experiencing an issue where the bingo checker is unclear as to where the matches have occurred (for example, the output will say "someone matched 4 on row 9 with 58," when there is no row 9).

In the Bingo Numbers workbook, I have included the bingo score card and the ways someone can win. The other workbook is the bingo checker with the macro I have been using, I have been copying and pasting in names and the individual strings then hitting run.

Here is the code:

Please Login or Register  to view this content.