我通过使用以下代码行来隐藏行,不包括前两行,因为它们是标题。
For i=3 To ThisWorkBook.Sheets("ALL").Range("A1",ThisWorkBook.Sheets("ALL").Range("A65536").End(xlUp)).Rows.Count
ThisWorkBook.Sheets("ALL").Rows(i).EntireRow.Hidden=True
Next
现在要获取隐藏行数,我正在使用以下代码行
From i=3 To ThisWorkBook.Sheets("ALL").Range("A1",ThisWorkBook.Sheets("ALL").Range("A65536").End(xlUp)).Rows.Count
ThisWorkbook.Sheets("ALL").EntireRow.Hidden=False
Next
但我得到rowcount
了 2。事实上,这张纸有 10 行。那么如何使隐藏的行可见?