Consegui criar o código que muda o campo a ser somando, isto é ,crei uma
combo que o usuário seleciona o campo e a PivotTable muda o campo, deveria,
poderei esta dando um nesta linha

ActiveSheet.PivotTables("PivotTable2").PivotFields(CampoTroca).Orientation =
xlHidden

A variavel campotroca, é onde esta armazenado o nome da variavel anterior,
ela deve ser escondido para que a nova Variavel seja analisada, mas não da
certo.


O erro é:

Erro em tempo de execução 1004
Não é possível definir a propriedade Orientation da classe PivotField