如何看excel隐藏的表 vba语句

Question

如题所述

Answer 1

有三种方法：
1、直接在Sheet2标签上点右键，弹出的菜单上面有个“隐藏”，点后就可以隐藏它了，想取消隐藏直接在其它工作表标签上点右键——取消，选想取消隐藏的工作表即可。这种方法较方便，取消也方便。当然也可以保护工作薄让人无法轻易取消隐藏。
2、可以用Alt+F11 打开VBA编辑器，在左侧上方，选中Sheet2，然后在左下方的属性框内，将Visible（最下面）设成“0－XlsheetHidden”即第二个。也可以实现隐藏Sheet2
3、按Alt+F11 打开VBA编辑器，在左侧上方，选中ThisWorkBook，复制代码
Private Sub Workbook_Open()
Sheet2.Visible = xlSheetVeryHidden
End Sub
到右边空白处，保存工作薄，重启时启用宏，也可以实现隐藏Sheet2的效果。

Answer 2

Sub 显示所有工作表()
    '定义一个工作表变量对象
    Dim wks As Worksheet
    For Each wks In Excel.ThisWorkbook.Worksheets
        '全部设置为可见
        wks.Visible = -1
    Next
End Sub

 使用方法请参考：

什么是VBA?如何使用它_百度经验

http://jingyan.baidu.com/article/09ea3ede265e8bc0aede39ba.html

本回答被提问者采纳