Enable Clear Filter on Protected Sheet's Excel Ribbon
即使Microsoft表示不可能:无法清除受保护工作表中的自动过滤器,但我仍然认为应该可以实现。至少我希望。
我知道我可以一栏一栏地清除过滤器,但是我希望用户能够单击Ribbon/Sort&Filter部分上的Clear功能。 (当前已禁用/显示为灰色)
互联网上有很多问题,但老实说,这些问题都不是有用的。有可能吗?
我尝试为Unprotect Sheet定义Worksheet_Change事件,但这根本不明智,因为这会使我的工作表变慢,并且我无法找到正确的条件来定义到Worksheet_Change中。在此示例中,无论何时选择$:$行,它都在运行。所以我需要另一个聪明的建议。
- 为什么不在工作表的顶部设置自定义按钮,使其取消保护工作表并清除过滤器? -每说一个自定义清除-
-
sgdva,这里的问题是,工作表顶部还有两个非常频繁使用的按钮,另一方面,此(数据清除)一个不是优先事项,用户可能很少使用它。所以我不想将其显示为第三个按钮。
-
恐怕没有其他简单的选择了。如果您真的想投入时间并以某种方式使用功能区进行操作,则可以尝试使用"自定义UI编辑器"
-
我已经尝试过将宏添加到功能区,效果很好,没关系,但是在我的计算机上,我将观看该视频,希望它将教我如何创建功能区,该功能区也将出现在其他用户的功??能区上。谢谢您的帮助。
-
确实,只有在您的计算机上才能使用excel简易解决方案向导。上面的那个,它适用于文件-因此打开该文件的任何PC都将与您相同。
您无需取消保护纸张即可清除过滤器。只需将此宏粘贴到模块中
1 2 3 4 5 6
| Sub ClearFilter()
Dim ws As Worksheet
Set ws = ActiveSheet
ws.AutoFilter.ShowAllData
End Sub |
然后为其分配快捷键。
现在,当您按CTRL SHIFT C时,您将看到自动过滤器数据已重置。
- 您好@Siddharth首先,您通过其他人的问题为我提供了很多帮助,非常感谢您,我没有机会感谢您:)现在的问题是,会有很多用户,我将无法通知所有人其中有关于快捷方式的内容,因此某种程度上应该是每个人都可以轻松看到并"知道它是什么"的视觉事物,这就是为什么我优先考虑的是真正的按钮本身。但是,作为一种选择,我是否可以为每个人的功能区添加功能/按钮呢?我可以将其添加到我的个人中,但是我不确定用户。
-
哦,是的:)您可以在分发文件之前向其添加一个按钮。您可能需要查看如何使用VBA添加自定义功能区选项卡?