excel 取消保护工作簿密码

yd1478235

各位大佬，请教下Excel文件中隐藏了工作表，且对该工作表的visible属性设置为 2-xlSheetVeryHidden，另外又设置了保护工作簿密码，有没有办法可以查看这个隐藏的工作表。比如这里想把表2显示出来，但又不知道保护工作簿的密码。
示例.rar (6.86 KB, 下载次数: 8)

2024-4-27 16:45 上传

点击文件名下载附件

红太阳的天

尝试使用VBA宏：
如果工作簿未设置VBA宏密码，您可以尝试编写一个VBA宏来更改工作表的 Visible 属性。以下是一个示例代码：

Sub UnhideSheet()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("Sheet2") ' 请将"Sheet2"替换为您工作表的实际名称
    ws.Visible = xlSheetVisible ' 设置工作表为可见
End Sub

ykcbf1100

工作簿密码都不知道，你怎么显示隐藏的工作表

cnmlgb9998

解除工作表、工作簿保护。这种VBA 代码，网上一大堆啊！！！！！不行，就用 excel工具箱。

yd1478235

ykcbf1100 发表于 2024-4-27 17:58
工作簿密码都不知道，你怎么显示隐藏的工作表

先隐藏工作表，再设置工作簿密码

yd1478235

红太阳的天 发表于 2024-4-27 17:20
尝试使用VBA宏：
如果工作簿未设置VBA宏密码，您可以尝试编写一个VBA宏来更改工作表的 Visible 属性。以下 ...

提示这个报错，原因好像是已经设置了工作簿密码，就不能设置工作表的可见性

q3698995

提供一个思路：
Sub aaa()
    Sheet2.Cells.Copy '复制表2的值
    Sheet1.Cells.PasteSpecial '粘贴到表1中
End Sub

yd1478235

q3698995 发表于 2024-4-28 09:30
提供一个思路：
Sub aaa()
    Sheet2.Cells.Copy '复制表2的值

厉害，拿到我要的东西了