Question

我制作了一本工作簿，其中需要保护一些工作表不被观看，因为很多人都要进入这个工作表，我希望在其中有更多的敏感信息，这些信息并不适用于所有人。 /> 为此，我用Google搜索并找到以下代码：

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim MySheets As String, Response As String
MySheet = "Sheet1"
If ActiveSheet.Name = MySheet Then
ActiveSheet.Visible = False
    Response = InputBox("Enter password to view sheet")
        If Response = "MyPass" Then
            Sheets(MySheet).Visible = True
            Application.EnableEvents = False
            Sheets(MySheet).Select
            Application.EnableEvents = True
        End If
End If
Sheets(MySheet).Visible = True
End Sub

完全符合我的需要，但有一个问题问题如下，为了它工作，我需要强制用户启用宏命令，如果你要保存文件，那么你必须将其保存为启用宏的工作簿，这不是我信任我的用户要做我的问题是：我是否可以这样做，如果不启用宏命令，您无法在不接受宏的情况下打开工作表，并且无法保存为普通的Excel工作簿？

Answer 1

我认为这里最好的答案是使用excel的内置功能保护工作表的密码：http://www.excel-easy.com/examples/protect-sheet.html

编辑：保护表仅防止编辑，建议隐藏的新方法详见：http://www.techrepublic.com/blog/microsoft-office/hide-excel-sheets-really-hide-them/

Excel强制执行宏命令

1 个答案: