求，excel vba 如何禁用筛选

aosiner123 · 发表于 2024-10-17 15:39

求，excel vba 如何禁用筛选，点击菜单上的筛选进行提示不允许使用

坏也是一种态度 · 发表于 2024-10-17 16:58

Sub jysx()
With ActiveSheet
.AutoFilterMode = False
MsgBox "筛选功能已禁用，当前不可用。"
End With
End Sub

excel玉米 · 发表于 2024-10-17 17:08

保护工作表即可达到要求

lss001 · 发表于 2024-10-18 13:04

'打开文件自动执行
Sub Auto_Open()
'删除右键菜单筛选命令 Application.CommandBars("cell").FindControl(ID:=31402).Delete
'屏蔽菜单筛选功能/灰色不可用
Call Sheet1.Protect(AllowFiltering:=True)
End Sub

		自动登录	找回密码
密码			免费注册

[求助] 求，excel vba 如何禁用筛选