Error con codigo de campo calculado

Buen dia:

Tengo el siguiente código de una tabla dinamica:

ActiveSheet.PivotTables("ADPRO").PivotFields("Suma de Costo").Orientation = _

xlHidden

ActiveSheet.PivotTables("ADPRO").AddDataField ActiveSheet.PivotTables("ADPRO"). _

PivotFields("Saldo"), "Suma de Saldo", xlSum

ActiveSheet.PivotTables("ADPRO").PivotFields("Suma de Saldo").Orientation = _

xlHidden

ActiveSheet.PivotTables("ADPRO").AddDataField ActiveSheet.PivotTables("ADPRO"). _

PivotFields("Costo"), "Suma de Costo", xlSum

pero cuando requiero que se oculte el campo Suma de Saldo que es un campo calculado me saca el siguiente error:

"No se puede asignar la propiedad Orientation de la clase PivotField"

Quisiera saber como programo esta línea de código para que me oculte ese campo. Gracias