VBA 如何发现EXCEL工作簿里是否有深度隐藏工作表

1 如果有的工作表sheet设置了  visible属性为 xlsheetVeryHide

  • visible属性,设置为  xlsheetVeryHide  -2
  • 不光在excel 列表里 无法看到
  • 在sheet表右键点菜单,也不会出现 取消隐藏,也就是无法通过 菜单呼出

2  方法1:在VBE编辑器内能看到深度隐藏的worksheet

3 方法2,写个VBA运行下 worksheets.count 会统计深度隐藏的sheet

Sub test_select1()

Dim arr1()

ReDim arr1(1 To Worksheets.Count)
For i = 1 To Worksheets.Count
    arr1(i) = Worksheets(i).Name
Next

For Each i In arr1
   Debug.Print i
Next

End Sub

3  推论,写个VBA运行下 wsheets.count 会统计深度隐藏的sheet 和chart等吧?

发布了416 篇原创文章 · 获赞 46 · 访问量 11万+

猜你喜欢

转载自blog.csdn.net/xuemanqianshan/article/details/104158947
今日推荐