excel表格隐藏后怎么恢复多个表

发布网友发布时间：2022-03-18 03:44

我来回答

共2个回答

热心网友时间：2022-03-18 05:13

1、如果隐藏是在工作表里有右击工作表标签隐藏的，可通过右击工作表标签，取消隐藏。

2、如果是在宏里面设置的工作表的Visible 属性为 xlSheetVeryHidden那么就只能用宏来重新设置的工作表的Visible 属性为 xlSheetVisible

如果将sheet1 设置为可见方法为：

sub Vsi()
Sheets("Sheet1").Visible = xlSheetVisible
end sub

3、如果将所有工作表的属性均设置为可见，运行下列宏即可：

Sub s()
Dim shet As Worksheet
For Each shet In Sheets
shet.Visible = xlSheetVisible
Next
End Sub

热心网友时间：2022-03-18 06:31

在任意显示的工作表标签上右击，弹出菜单中选择“取消隐藏”，然后选择要显示的工作表，点“确定”，这样要显示多个，需要重复多次。但可以用下面的方法一次取消多个隐藏的工作表：
按;Alt+F11，打开VBA编辑，在VBA界面中，左侧上部分列出所有工作表，不管是否为隐藏的。点击要取消隐藏的工作表名称，在左侧下面的属性中，最后一行中选择为-1，工作表可见，分别选择各个需要取消隐藏的的工作表并修改属性后，就可以在标签中显示出来了。