Excel VBA清除表中的过滤器并消除任何错误
我是个新手,刚接触Excel和VBA等 我有一个大型数据库,其中包含以表格形式显示的用户配置文件详细信息。我遇到的问题是,我有一个命令按钮来清除应用于该表的筛选器,我通过记录得到了Required宏,但是如果没有应用筛选器,我会遇到以下错误: 运行时错误“1004”: 工作表类的ShowAllData方法失败 我知道我为什么会出错,这仅仅是因为没有应用过滤器,因此它抛出了这个错误,我希望完全忽略这个错误 这是我的命令按钮代码:Excel VBA清除表中的过滤器并消除任何错误,vba,Vba,我是个新手,刚接触Excel和VBA等 我有一个大型数据库,其中包含以表格形式显示的用户配置文件详细信息。我遇到的问题是,我有一个命令按钮来清除应用于该表的筛选器,我通过记录得到了Required宏,但是如果没有应用筛选器,我会遇到以下错误: 运行时错误“1004”: 工作表类的ShowAllData方法失败 我知道我为什么会出错,这仅仅是因为没有应用过滤器,因此它抛出了这个错误,我希望完全忽略这个错误 这是我的命令按钮代码: Private Sub CommandButton25_Click(
Private Sub CommandButton25_Click()
ClearFilters2 Macro
Range("Table24[#Headers]").Select
ActiveSheet.ShowAllData
End Sub
如果您能帮我消除运行时错误,我们将不胜感激。我是否可以要求提供代码并进行更正
谢谢
JD您可以在下一步错误恢复时使用
您应该确保在错误转到0时在代码中的适当位置重新启用错误处理
您还可以创建一个标签,并告诉代码在错误转到时发生错误时转到该标签
有关更多信息,请参阅错误处理。关于错误恢复下一步
将使您的代码完全忽略错误-尽管通常不建议使用<代码>关于错误转到0将允许错误再次发生。您能否提供有关如何包含上述内容的示例?只需将关于错误恢复下一步
放在过程顶部即可。所以在第行私有子命令按钮25\u点击()
。完美!非常感谢。