我有一个用于操作数据透视表的切片器。数据透视表是一个过滤器列表。最终，切片器 + 数据透视表用于检索数据并为最终用户填充工作表。
问题
我最近添加了一个自动完成数据的组合框，因此最终用户可以快速输入他们正在寻找的内容，而不是花时间滚动浏览每个切片器并选择适当的选项。当我一直在测试这张纸时，我注意到我的一个切片机的顶部出现了一个空白行。如何删除此空白行？
尝试
我检查了数据透视表 + 切片器的数据源，没有空白行。我做了一个 GoTo --> Blanks 来尝试隔离任何空白单元格（数据中没有空白单元格）。我刷新了数据源，并将数据源更改为应有的状态，切片器中的空白行仍然存在，尽管我的数据透视表数据中没有空白。我还去了切片器设置并检查了“隐藏没有数据的项目”，但切片器中的空白条目仍然存在。
我要添加操纵数据透视表的 vba 代码不会以任何方式修改切片器。在我的 vba 中，我调用：
当我锁定工作表时：
Me.Protect DrawingObjects:=False, UserInterfaceOnly:=True, AllowUsingPivotTables:=True
如果ComboBox1_Click()用户从自动完成下拉列表中选择一个条目后：
ActiveSheet.PivotTables("PivotTable").PivotFields("Portfolio").CurrentPage = _
ComboBox1.Value
当用户单击“清除过滤器”按钮时，我会调用：
ActiveWorkbook.ActiveSheet.PivotTables("PivotTable").ClearAllFilters
这些是我的 vba 代码中对数据透视表的唯一操作。