Cách nhanh nhất để đọc một cột số thành một mảng

Question

Giả sử tôi có một cột số (số lượng có thể khác nhau, nhưng có thể ở bất kỳ đâu trong khoảng từ 1000-10000) và tôi muốn đọc tất cả các số đó thành một mảng trong VBA, cách nhanh nhất để làm như vậy là gì?

Rõ ràng tôi có thể tạo một mảng có kích thước 10000 và thực hiện một vòng lặp for/while-loop nhưng có cách nào nhanh hơn điều này không?

Answer 1

Như thế này?

Dim Ar as Variant 

Ar = Sheets("Sheet").Range("A1:A10000").Value 

Nếu bạn không biết những dòng cuối cùng sau đó bạn có thể tìm thấy hàng cuối cùng sử dụng this và sau đó sử dụng đoạn mã trên như

Ar = Sheets("Sheet").Range("A1:A" & LRow).Value