如何解除或移除Excel工作簿受保护的BbgResearchPubStorageWorksheet

方法一：用VBA代码强制处理 #

• 打开目标工作簿，按下Alt + F11打开VBA编辑器
• 在左侧「工程资源管理器」里找到当前工作簿，右键选择「插入」→「模块」
• 把下面的代码粘贴进去：

Sub RemoveBbgProtectedSheet()
    Dim ws As Worksheet
    On Error Resume Next
    Set ws = ThisWorkbook.Worksheets("BbgResearchPubStorageWorksheet")
    On Error GoTo 0
    
    If Not ws Is Nothing Then
        ' 尝试解除保护，先试空密码，再试彭博常用默认密码
        ws.Unprotect Password:=""
        ws.Unprotect Password:="Bloomberg"
        ' 先把隐藏的工作表显示出来
        ws.Visible = xlSheetVisible
        ' 关闭删除确认弹窗
        Application.DisplayAlerts = False
        ' 删除工作表
        ws.Delete
        Application.DisplayAlerts = True
        MsgBox "目标工作表已移除", vbInformation
    Else
        MsgBox "没找到BbgResearchPubStorageWorksheet工作表", vbExclamation
    End If
End Sub

• 按F5运行代码，或者点击编辑器工具栏的运行按钮即可

方法二：通过修改文件底层结构移除 #

如果VBA方法无效，可以试试这个硬改方式：

• 关闭目标Excel文件，把文件后缀从.xlsx/.xlsm改成.zip
• 解压这个ZIP包，进入xl/worksheets/文件夹，找到对应BbgResearchPubStorageWorksheet的sheet[序号].xml文件（可以打开xml文件搜索工作表名称确认）
• 删除这个xml文件，再打开xl/workbook.xml，找到对应该工作表的<sheet>标签行，直接删掉
• 把解压后的所有文件重新打包成ZIP，改回原来的Excel后缀名，再打开文件就看不到那个工作表了

注意事项 #

• 操作前一定要备份原工作簿，避免误操作导致数据损坏
• 针对带宏的.xlsm文件，修改后要检查宏功能是否正常
• 若密码保护比较特殊，自行使用破解工具时要确保是处理自己有权限的文件，遵守合规要求

内容的提问来源于stack exchange，提问作者feetwet