Olá pessoal,

Tenho um gráfico dinâmico que é gerado à partir de uma tabela dinâmica e estou tentando automatizar algumas rotinas por botões para evitar que o usuário precise ficar sempre ajustando filtros. O problema é que em algumas situações vou ter que remover um algo de "Valores" para adicionar outro campo e não sei como fazer para verificar se esse campo já existe.
Abaixo uma tentativa minha de adicionar um campo e remover o contagem de nome, quando ele realmente existe funciona, mas quando não existe me retorna um erro dizendo que "Não é possível obter a propriedade PivotFields da classe PivotTable.

    With ActiveChart.PivotLayout.PivotTable
    With .PivotFields("Contagem de NOME")
        .Orientation = xlHidden
    End With
    .AddDataField ActiveChart.PivotLayout.PivotTable.PivotFields("Classificação da atividade"), _
    "Contagem de Classificação da atividade", xlCount
    End With

É possível fazer um if que entrasse somente quando o campo existisse, algo parecido com

    If ActiveChart.PivotLayout.PivotTable.PivotFields = "Classificação da atividade" Then
    MsgBox "Entrar nesse if somente se o field existir no campo valores"
    End If

Obrigado.