今天要和大家分享的是：Excel VBA取消全部隐藏的工作表？

工具/原料

  • Excel vba

方法/步骤

  1. 1

    首先打开数据表格需要将sheet1以外的表格进行全部隐藏，如下图所示：

  2. 2

    然后按alt+f11快捷键，打开VBA代码界面，如下图所示：

  3. 3

    插入模块，如下图所示：

  4. 4

    然后在新的模块里输入如下代码：

    Sub 打开全部隐藏工作表()

    Dim i As Integer

    For i = 1 To Sheets.Count

        Sheets(i).Visible = True

    Next i

    End Sub

    ，如下图所示：

  5. 5

    回到excel界面快捷键alt+f8打开宏执行对话框，如下图所示：

  6. 6

    找到对应的命令，单击执行按钮，如下图所示：

  7. 7

    即可看到隐藏的图表，全部显示出来，如下图所示：

    END

注意事项

  • 如果觉得经验有用感谢你的点赞和分享！
经验内容仅供参考，如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士。