Help Simplify Long Select Case with If/Then

I would like to see how this can be simplified or what other methods can be used to achieve the same Goal

Please look at the Macro PlayerStat() in Module1
It is too long for me to post the macro in Code Brackets.. sorry.

If there is a different way, like to select the value in the selected range and cross reference it against a list. i'm not sure... trying to learn and be efficient.

Thanks in advance.