Excel 2003 受保护的工作表，不允许 Excel 2000 用户使用自动筛选

发布于 2024-12-07 07:17:37 字数 325 浏览 0 评论 0原文

我已经创建了一个工作电子表格，并试图保护该工作表，以便除了我自己之外没有人可以编辑该文档。我已经对其进行了设置，以便我可以编辑文档的全部内容。在保护设置中，我勾选了任何用户都可以使用自动过滤器的框。

我在应用安全性之前设置了自动过滤器，因此这不是许多论坛建议的问题。然而，我使用的是 Excel 2003，而组织中的大多数人使用的是 Office 2000。我不禁认为这两个系统之间存在一些不兼容性。有人可以建议吗？ VBA 宏实际上并不是一个选项，因为组织内的默认设置是只有签名的宏才能运行，但即便如此，它们也必须由最终用户验证（对于 IT 知识较低的用户来说非常烦人）。

有谁知道如何使这项工作有效？

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

一梦等七年七年为一梦 2024-12-14 07:17:38

没有 VBA 这是不可能的。请参阅 http: //office.microsoft.com/en-us/excel-help/enable-autofilter-功能性-for-a-protected-worksheet-HA001098270.aspx

默认情况下，当您保护部分或全部电子表格时，Excel 中的自动筛选功能将变得不可用。如果您使用 Microsoft Office Excel 2003 或 Excel 2002，则可以手动恢复该功能。如果您使用 Excel 2000，则需要使用几行 Microsoft Visual Basic® for Applications (VBA) 代码。
使用 VBA 代码保护工作表并启用自动筛选
Excel 2000 中的功能
此处显示的示例代码保护工作表（不是工作簿）和
为该工作表启用自动筛选功能。代码
仅适用于 Excel 2000。此特定示例会自动运行
当您打开包含受保护工作表的工作簿时。这
代码还包含用于取消工作表保护的密码。
如果尚未启动，请启动 Excel 2000，打开所需的工作簿，然后记下要保护的工作表的名称。
在“工具”菜单上，指向“宏”，然后单击“Visual Basic 编辑器”。
在项目资源管理器中，双击“ThisWorkbook”。
代码窗口中将打开一个新的空白代码模块。
复制以下示例代码并将其粘贴到代码窗口中：

Private Sub Workbook_Open()
     Sheet1.Protect password:="test", DrawingObjects:=True, _
         contents:=True, Scenarios:=True, _
         userinterfaceonly:=True
     Sheet1.EnableAutoFilter = True End Sub

It's not possible without VBA. See http://office.microsoft.com/en-us/excel-help/enable-autofilter-functionality-for-a-protected-worksheet-HA001098270.aspx

By default, the AutoFilter functionality in Excel becomes unavailable when you protect part or all of a spreadsheet. If you use Microsoft Office Excel 2003 or Excel 2002, you can restore that functionality manually. If you use Excel 2000, you need to use a few lines of Microsoft Visual Basic® for Applications (VBA) code.
Use VBA code to protect a worksheet and enable the AutoFilter
functionality in Excel 2000
The sample code shown here protects a worksheet (not a workbook) and
enables the AutoFilter functionality for that worksheet. The code
works only with Excel 2000. This particular sample runs automatically
when you open the workbook that contains the protected worksheet. The
code also contains a password that you use to unprotect the worksheet.
If you haven't already, start Excel 2000, open the desired workbook, and note the name of the worksheet that you want to protect.
On the Tools menu, point to Macro, and then click Visual Basic Editor.
In the Project Explorer, double-click ThisWorkbook.
A new, blank code module opens in the code window.
Copy the following sample code and paste it into the code window:

Private Sub Workbook_Open()
     Sheet1.Protect password:="test", DrawingObjects:=True, _
         contents:=True, Scenarios:=True, _
         userinterfaceonly:=True
     Sheet1.EnableAutoFilter = True End Sub

回复收藏 0 原文