Olá pessoal,

Estou tentando introduzir na parte de valores da tabela dinamica, um campo calculado via macro. Utilizando o seguinte código abaixo:

ActiveSheet.PivotTables("Tabela dinâmica1").PivotFields("MEUCAMPOCALCULADO"). _
Orientation = xlHidden

O código funciona muito bem para os campos que não foram calculados por mim e que estão na base de dados da tabela porém para campo calculado não.

PS: engraçado que para retirar o campo calculado eu não tive dificuldade, utilizando o seguinte código:

ActiveSheet.PivotTables("Tabela dinâmica1").AddDataField ActiveSheet. _
PivotTables("Tabela dinâmica1").PivotFields("MEUCAMPOCALCULADO"), _
"Soma de MEUCAMPOCALCULADO", xlSum

Alguém possui conhecimento sobre o assunto?

Grato a todos pela atenção.