VBA pivotfields.Currentpage覆盖值

Question

我有一个可以出现在表格中的产品A到D的集合列表。转出时我使用VBA设置过滤器并将数据复制到另一个表中。我遇到的问题是，如果产品值不在给定的数据集中，则它会覆盖当前在过滤器中的任何内容。

之前的透视：

Pivot After：

实施例。客户端1只有产品A，B，D。VBA将通过并尝试过滤C但由于C不在过滤器中，C将覆盖B.所以当你看过滤器它会有A，C，D。

以下是使用的基本代码。我尝试过使用Resume Next和GoTo进行错误处理，但都没有工作。有什么想法吗？

 With pvt
    On Error Resume Next
    .pivotFields("Product").ClearAllFilters
    .pivotFields("Product").CurrentPage = "C"
    If Err.Number = 0 Then
        With pvt
            'Code'
        End With
    End If
  End With