将Active X组合框连接到数据透视表过滤器

Question

在将Active X组合框链接到数据透视表筛选器时遇到一些问题。基本上，我需要让用户从组合框中选择一个需要链接到数据透视表过滤器的ID。我正在使用以下代码：

Private Sub ComboBox1_Change()
Dim sheet As Worksheet
Dim pt As PivotTable
Dim ptField As PivotField
Set sheet = ThisWorkbook.Worksheets("Overview")
Set pt = sheet.PivotTables("Main")
Set ptField = pt.PivotFields("CustomersId")
ptField.ClearAllFilters
ptField.CurrentPage = Me.ComboBox1.Value
End Sub

我得到的错误是：“无法获取数据透视表类的PivotFields属性”。

以上代码有什么问题的想法吗？我想念的东西吗？

提前谢谢