Replace blanks with zeros inside a VBA created pivot

Hello everyone,

I have some code that works great for creating a pivot. See below:

Please Login or Register  to view this content.

There are blanks that coming up in the DataField. How can I tell VBA to replace those blanks with zero?

Thank you all in advance for your help.


Eddie