Boa tarde!!

Seria ideal postar seu arquivo modelo!

O que tem neste range a ser filtrado? (datas, textos, etc)

Att

Não posso postar o arquivo porque é de empresa, mas tirei dois prints pra mostrar o que acontece, o primeiro mostra o filtro com um dado existente. O segundo mostra o filtro aceitando um dado que não existe! O pior é que não retorna nenhum erro e ainda mostra dados de outro "Mês/Ano". Eu só preciso saber um jeito da tabela não aceitar dados que não existam em seu filtro!

Já resolvi o problema com o código abaixo usando For Each, o mesmo verifica se o dado da celula AS78 existe na lista do filtro, se existir o mesmo é exibido, se não o mesmo é ocultado.

Sub Solucao()
On Error GoTo LimparFiltro

'Filtrar determinado campo de TD via celula
Dim objPivotField As PivotField
Dim objPivotItem As PivotItem
Set objPivotField = _
ActiveSheet.PivotTables("DinamicaConferente").PivotFields(Index:="Mês/Ano")
ActiveSheet.PivotTables("DinamicaConferente").ClearAllFilters
For Each objPivotItem In objPivotField.PivotItems
If objPivotItem.Name = Range("$AS$78").Value Then
objPivotItem.Visible = True
Else
objPivotItem.Visible = False
End If
Next objPivotItem

Exit Sub

LimparFiltro:
ActiveSheet.PivotTables("DinamicaConferente").ClearAllFilters