主题：获取某列的值

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range
Rg = Ws.Range("B:B")

只能获取单个单元格的值，无法获取这个列的值。想具体做什么

我A列有10000行的数据，我想读取这些数据，复制到其它地方，比如复制到textbox里

要一个一个单元格复制吗？

其实用Foxtable内部的方法也不错啊：

谢了