如何同时取消隐藏在工作簿里的若干工作表

来源：百度知道 编辑：UC知道 时间：2024/05/02 09:58:52

通过基本操作似乎不行，得通过vba。
按住ALT依次按F11,I,M
粘贴下面的代码后按F5即可取消所有工作表的隐藏。

Sub 取消隐藏()
Dim s As Worksheet
For Each s In ThisWorkbook.Worksheets
s.Visible = xlSheetVisible
Next s
End Sub

点取消全部隐藏

只能一个一个取消隐藏