VBA Pivot Table with Fixed Rows

Hi,

This is my first post. I have been stuck with this for some time. I am trying to create a pivot table with fixed rows but it was not possible. The reason for doing this is that sometimes I get data without certain row labels and I do not want the rows to go missing.

Data (monday)
Apple---1
Apple---1
Pear----1

Data (tuesday)
Apple---1
Orange-1
Pear----1


The pivot table I want to achieve ( for monday):

Fruit----Count
Apple-----2
Pear -----1
Orange----0

Even though the count for orange is 0, I want to still see it in the table. Is there any way to do this?