Formatos numéricos en tablas dinámicas

Gracias de antemano por vuestro tiempo.
El problema es el siguiente cada mes tengo modificar un montón de tablas dinámicas añadiéndole campos a los que tengo que cambiar de formato por lo que me cree esta macro:
Sub Diciembre()
Tabla = ActiveCell.PivotTable
campo = ActiveCell.PivotField
With ActiveSheet.PivotTables(Tabla).PivotFields(campo)
.Function = xlSum
.NumberFormat = "#.##0,00 ?"
End With
End Sub
El caso es que el formato que me pone no es ese sino que me pone uno personalizado con "#.##0,00000/?".
¿A qué puede ser debido?
¿Cómo lo corrijo?
Gracias otra vez