阅: 3355 | 回: 4
等级:学者-
积分:99 -
财富值:250 -
身份:普通用户
回复:楼主
楼主用这个宏,放到收纳箱里面 用起来更简单。
Sub 显示当前全部工作簿的隐藏区域()
On Error Resume Next
Dim wb As Workbook
Dim ws As Worksheet
For Each wb In Application.Workbooks
For Each ws In wb.Worksheets
ws.Rows.Hidden = False
ws.Columns.Hidden = False
Next
Next
End Sub
我只是一个打工仔..
等级:初学者
等级:传说级人物