这是因为 有些工作表和名称已经被隐藏了。 首先,使用宏命令将二者显示出来,
Sub test()
Dim sh As Worksheet
For Each sh In ThisWorkbook.Sheets
sh.Visible = xlSheetVisible
Next
Dim nm As Name
For Each nm In ThisWorkbook.Names
nm.Visible = True
Next
End Sub
第二,然后将多余的Marco的sheet删除。第三,按 ctrl+F3 显示名称管理器,将其中的所有名称删除。 搞定!!!
Sub test()
Dim sh As Worksheet
For Each sh In ThisWorkbook.Sheets
sh.Visible = xlSheetVisible
Next
Dim nm As Name
For Each nm In ThisWorkbook.Names
nm.Visible = True
Next
End Sub
第二,然后将多余的Marco的sheet删除。第三,按 ctrl+F3 显示名称管理器,将其中的所有名称删除。 搞定!!!