VB.NET在受保护的Excel中启用自动筛选

我试图在保护工作表时启用筛选选项，但无法启用

         If Trial Then
             'add filter on header
             oSheet.Range("A2").AutoFilter()
             oSheet.EnableAutoFilter = True
             oSheet.Range("A1:A1").Style.Locked = True
             oSheet.Protect("SamplePassword")
         Else
             oSheet.Range("A1:" & colAlpha & count).AutoFilter()
         End If

这是我想要启用的选项，它允许用户在Excel受保护的情况下进行筛选

如您所见，我试图在代码中应用[EnableAutoFilter]，但它不起作用。 下面是我的示例结果

筛选器已应用，但我无法选择筛选-默认为全部。 请让我知道，如果你做过类似的事情之前，我一直试图谷歌一整天，但仍然没有运气。

---

非常感谢

我做了一些额外的研究，发现有一种方法适用于上述问题

如前所述，您可以定义不同类型的参数，而不仅仅是应用保护（“密码”），如下所示：

oSheet.Protect("SamplePassword", False, True, True, True, False, False, False, False, False, False, False, False, False, True, False)

并参考文档以打开/关闭“设置”