使用以下代码,可以在保护的工作簿中显示隐藏的工作表:
Sub UnhideSheet() Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets ws.Visible = xlSheetVisible Next ws End Sub
这将循环遍历所有的工作表,并将它们的可见性更改为“可见”。然后,所有被隐藏的工作表都会变成可见的。请注意,这需要保护的工作簿的密码才能执行。
上一篇:保护DataSet免受SQL注入的攻击
下一篇:保护登录后页面免受未经授权访问 - jQuery + Java Spring