Pivot table macro not working and I'm at a lose as to why

I have attached a worksheet that is driving me crazy. The code that I am using is listed below:

HTML Code: 

I know this code works because I have used it many, many times and it gives the pivot results I am looking for. I really don't know what the problem is here. Any thoughts are welcome.

Thanks

Eddie