在Excel中获取所有未隐藏的行

有没有办法获得VBA中的所有行的数组，然后将其复制到一个新的工作表？

我假设正确的属性是行（索引）。隐藏，但我不知道如何使用这个。

有一个简单的方法吗？ 我的问题主要是，我不能昏暗的东西作为行。

Answer 1

要select可见行：

Sheets("yourSheet").Rows.SpecialCells(xlVisible).Copy Sheets("secondSheet").Range("A1").PasteSpecial xlPasteValues 

但是你实际上可以将某些东西变暗为行，因为行属性返回一个范围，所以你只需将你的variables变暗为一个范围。

如果你想清除你的剪贴板后使用：

 Application.CutCopyMode=False 

另外请注意，在Excel中使用复制和粘贴效率不高。
如果可以，您应该将一个范围分配给另一个范围。