Giới hạn kích thước mảng vượt qua đối số mảng trong VBA

Question

Excel-VBA 2007 dường như có giới hạn 64k đối với kích thước mảng được chuyển làm đối số.

Có ai biết về bản sửa lỗi hoặc công việc không?

Dưới đây là các mã:

Public Function funA(n) 
    Dim ar() 
    ReDim ar(n) 
    funA = ar 
End Function 

Public Function funB(x) 
    funB = UBound(x) 
End Function 

Từ Excel:

=funB(funA(2^16-1)) '65536 as expected 

=funB(funA(2^16)) 'Gives a #VALUE 

Nhìn bên trong, Funa() hoạt động tốt nhưng, truyền cho funB, đối số x là một Lỗi 2015.

Answer 1

Điều này dường như là gần với một công việc xung quanh như tôi có thể tìm thấy. Làm liên chức năng cuộc gọi từ VBA

Nếu bạn thực hiện một cái gì đó như thế này

Public Function funBA(n As Variant) As Variant 
    funBA = funB(funA(n)) 
End Function 

nó dường như làm việc lên đến n = 2^24 = 2^8^3 (mà không giống như bất kỳ kiểu dữ liệu điểm break trong VBA mà là nơi treo lên là, nhưng đó là một mảng khá lớn)

Answer 2

Nó không phải là một vấn đề VBA vì bạn có thể chạy này và nhận được không có lỗi

Public Sub test() 

    x = funB(funA(2^16 - 1)) 
    y = funB(funA(2^16)) 

    Debug.Print x; y 

End Sub 

Nó có vẻ là một vấn đề đi qua nó trở lại Excel - không nhiều tài liệu nhưng nó có vẻ là một giới hạn Excel.

Dưới đây là một liên kết nhưng không có giải pháp WorksheetFunction array size limit

và một http://answers.microsoft.com/en-us/office/forum/office_2007-excel/passing-arrays-to-excel-worksheet-functions-in/56d76732-9a15-4fd2-9cad-41263a4045d4

Answer 3

Tôi nghĩ đó là một hạn chế của các tế bào bảng tính riêng của mình, chứ không phải là VBA. Excel có thể vượt qua các mảng lớn hơn 2^16 giữa các hàm, nhưng dường như nó không thể chứa một mảng có kích thước đó trong một ô.

Làm thử nghiệm, đánh dấu funA(2^16) trong công thức ô và nhấn F9 - nó sẽ cung cấp cho bạn lỗi '#VALUE!'.

Bởi vì công thức đã tính kết quả của funA trước khi bắt đầu funB, sau đó cố gắng chạy funB trên một hàm đã được tính toán lỗi.

Có vẻ như một công việc xung quanh giống như Brad được đăng (tức là hàm thứ ba tính funB(funA(n)) bên trong) giữ cho ô ra khỏi phương trình cho đến khi tính toán hoàn thành, vì vậy nó hoạt động tốt.

Answer 4

Vì mảng đơn chiều được chuyển trở lại Excel dưới dạng một hàng cột bạn đã đạt đến giới hạn Excel 2007 về số cột (64K).

Nếu bạn thực hiện mảng của bạn 2 chiều và trở lại như hàng cần làm việc:

Public Function funA(n) 
    Dim ar() 
    ReDim ar(n,1) 
    funA = ar 
End Function 

Hoặc bạn có thể sử dụng Transpose để xoay mảng từ một hàng để một cột, nhưng điều này có lẽ là kém hiệu quả hơn so với việc tạo ra một mảng 2 chiều ở vị trí đầu tiên.