VBA for pivot table won't group fields

My macro creates a pivot table but I am running into an issue when it goes to group one of the numeric columns as I get a "Group method of Range class failed" message. The grouping portion of the code is from a recorder. The rest of the code not shown attempts to group three other fields and then finish out. Any thoughts on how to fix this?

Also, I have to create this report weekly so it's a new one each week. Do you see any code issues with the creation of the table? I've noticed that the pivot table # changes each time it gets created so I'm wondering if I need to be more exact? Sorry if that second question is too vague. Thanks!

Please Login or Register  to view this content.

I was able to figure this out. Here is the code.

Please Login or Register  to view this content.