急急急！为什么在受保护的工作表中能调整分级显示视图却无法使用自动筛选

chnha

相当的奇怪，保护工作表时我选择了允许“自动筛选”项目，可是为了在受保护的工作表中能调整分级显示视图，我在thisworkbook()中加入了宏代码
Private Sub Workbook_Open()
   Worksheets("sheet3").Protect Password:="pwd", userinterfaceonly:=True
   Worksheets("sheet3").EnableOutlining = True
End Sub
后，分级显示能用了，但自动筛选却用不了了，再打开保护工作表设置时发现“自动筛选”的勾被自动取消了
这是怎么回事啊，希望高手们能给个解释下，看看有没方法能解决在受保护时既能使用分级显示又能使作自动筛选

chnha

附件中的密码是:
pwd

chnha

经 过 摸 索 ,还 是 自 己 解 决 了 . 把 代 码 改 为 如 下 :
Private Sub Workbook_Open()
   Sheets("sheet3").Protect Password:="pwd", userinterfaceonly:=True, DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowFiltering:=True
   Sheets("sheet3").EnableOutlining = True
End Sub
结 果 好 了 ,研 究 一 段 时 间 后 ,我发 现 以 上 代 码 的 意 思 :
1.如 果 原 来 表 设 好 了 密 码 ,则 宏 会 先 与 原 密 码 比 对 ,如 果 正 确 则 进 行 后 面 的 操 作 ,如 果 错 误 则 退 出.
2.如 果 原 来 仅 保 护 了 表 而 没 有 设 置 密 码或 原 来 压 根 就 没 保 护 工 作 表 , 那 么 此 时 宏 会 先 对 表 进 行 保 护  并 按 代 码 中 设 置 的 密 码 进 行 密 码 设 置 ,接 着 会 再 进 行 后 面 的 操 作 .因 此 当 你 再 需 要 取 消 保 护 时 则 需 要 先 输 入 宏 设 置 的 密 码 才 行 .

原 来 的 代 码 仅 对 表 进 行 了 密 码 保 护 和 分 级 显 示 可 用 ,而 没 有 选 择 "选 定 单 元 格 "和 "使 用 自 动 筛 选 "项 目 ,因 此 原 来 的 代 码 在 宏 运 行 后 不 能 进 行 自 动 筛 选 了 .

[ 本帖最后由 chnha 于 2010-1-3 16:13 编辑 ]

ycxtired

我怎么复制了代码  但是还是不能分级显示啊。。。。！！！求助求助！！

wanghoulei

但是就是不能插入行

sxw038331

我的表格现在是能自动筛选，却不能分级显示了。。。有没有办法帮我调一下啊？

nerazzurri07

wanghoulei 发表于 2013-6-3 10:41
但是就是不能插入行

我也想要插入行，有没有办法？