筛选Excel数据集时ShowAllData失败

Question

我有一个ETL文件，该文件突然停止使用ShowAllData命令。 在以前的循环，数据被过滤。

吉文斯：

wkstSourceSheet在另一个模块中作为包含oSourceTable的工作表建立，该表是要上传的数据和/或清理后的数据的原始表。 这些步骤包含在功能中，按模块按逻辑分组。 所有本地控件都包含在Local_Controls模块中。

循环步骤

• 删除数据上的所有排序和筛选器（失败时将在第二个循环中）
• 应用新的排序和过滤器
• 如果已打开目标文件并且此循环的目标文件不同，则保存目标文件
• 如果需要，打开目标文件
• 从目的地清除适用的数据
• 将新数据粘贴到目标
• 清除一些变量
• 环

码

If wkstSourceSheet.FilterMode = True Then
    wkstSourceSheet.ShowAllData
End If

我已经可以通过将其替换为解决方法

If wkstSourceSheet.FilterMode = True Then
    oSoureSheet.Range.Autofilter
    oSoureSheet.Range.Autofilter
End If

但是，我试图弄清楚为什么当对数据进行明确过滤时它会失败。

Answer 1

（如果可以的话，我会将其写为评论...但是我还没有足够的声誉）

您可能对Excel具有的两种不同类型的自动筛选器有疑问吗？

一个用于简单的工作表范围，另一个用于ListObjects（Excel“表”）。

如果用户手动与工作表交互（而不仅仅是运行代码），则用户可能已经以两种不同的方式启动了筛选器...