Hướng dẫn này sẽ dạy bạn cách lấy độ dài (kích thước) của Mảng trong VBA.
Nhận độ dài mảng
Để biết độ dài của Mảng, bạn cần biết vị trí bắt đầu và kết thúc của mảng. Bạn có thể thực hiện việc này với Chức năng UBound và LBound của VBA.
Chức năng LBound và UBound
Quy trình này trình bày cách sử dụng các hàm UBound và LBound trên một mảng thứ nguyên:
123456 | Sub UBoundLBound ()Dim exArr (1 đến 4) dưới dạng chuỗiMsgBox UBound (exArr)MsgBox LBound (exArr)Kết thúc Sub |
Trừ hai sẽ cho bạn độ dài mảng (UBound - LBound +1).
Nhận hàm độ dài mảng
Hàm này sẽ tính toán kích thước (chiều dài) của Mảng một chiều:
1234567 | Chức năng công cộng GetArrLength (a As Variant) As LongNếu IsEmpty (a) ThìGetArrLength = 0KhácGetArrLength = UBound (a) - LBound (a) + 1Kết thúc nếuChức năng kết thúc |
Nhận kích thước mảng 2D
Hàm này sẽ tính toán số lượng vị trí trong một mảng hai chiều:
12345678910111213141516171819 | Sub testArrySize ()Dim arr2D (1 đến 4, 1 đến 4)MsgBox GetArrSize_2D (arr2D)Kết thúc SubHàm công khai GetArrSize_2D (a As Variant) Miễn làDim x As Long, y As LongNếu IsEmpty (a) ThìGetArrSize_2D = 0Khácx = UBound (a, 1) - LBound (a, 1) + 1y = UBound (a, 2) - LBound (a, 2) + 1GetArrSize_2D = x * yKết thúc nếuChức năng kết thúc |