按键盘上的Alt+F11，调出VBE对话框，然后双击左面的任何一个工作表的名称，然后将下列代码粘贴进去。然后点击工具栏上的绿色按钮运行一次即可。
Sub unhide()
For i = 1 To Sheets.Count
Sheets(i).Visible = True
Next i
End Sub
按键盘上的Alt+F11，调出VBE对话框，然后双击左面的任何一个工作表的名称，然后将下列代码粘贴进去。然后点击工具栏上的绿色按钮运行一次即可。
Sub unhide()
For i = 1 To Sheets.Count
Sheets(i).Visible = True
Next i
End Sub
