小编Lee*_*ght的帖子

我试图从一个范围内的可见单元格中获取所有值到一个数组中.我的代码只使数组携带值直到第一个不可见的Cell然后停止.

Public Function ListeMaschinen() As Variant

Dim Auswahl As Range

With Sheets("qry_TechnischesDatenblatt")
Set Auswahl = .Range(.Range("A2:B2"), .Range("A2:B2").End(xlDown)).SpecialCells(xlCellTypeVisible)
End With

ListeMaschinen = Auswahl

End Function

如果我选择范围,它会显示我想要标记的所有单元格.

Auswahl.Select

我无法弄明白为什么,你能帮助我吗？

多谢!背风处