AllowFiltering 属性

       

如果允许用户使用工作表受保护之前设置的“自动筛选”,则返回 TrueBoolean 类型,只读。

expression.AllowFiltering

expression   必需。该表达式返回一个 Protection 对象。

说明

可用 Protect 方法的参数设置 AllowFiltering 属性。

AllowFiltering 属性允许用户更改已有的“自动筛选”上的筛选条件。用户不能创建或删除受保护的工作表上的“自动筛选”。

若要筛选受保护的工作表上的单元格,则必须先取消对这些单元格的锁定。

示例

本示例允许用户筛选受保护的工作表上的第 1 行并通知用户。

Sub ProtectionOptions()

    ActiveSheet.Unprotect

    ' Unlock row 1.
    Rows("1:1").Locked = False

    ' Allow row 1 to be filtered on a protected worksheet.
    If ActiveSheet.Protection.AllowFiltering = False Then
        ActiveSheet.Protect AllowFiltering:=True
    End If

    MsgBox "Row 1 can be filtered on this protected worksheet."

End Sub