excle VBA? 怎么把這個數組定義為公共常量？在excel的vba　IDE中新建一個模塊，然后輸入代碼：publicF()asvariant在新建一個過程叫做publicSubINITF()Re

excle VBA? 怎么把這個數組定義為公共常量？

在excel的vba　IDE中新建一個模塊，然后輸入代碼：publicF()asvariant在新建一個過程叫做publicSubINITF()RedimF(XFToXT,YFToYT)endsub其中的xf,xt,yf,yt需要你自己給值，因為我不知道你到底需要多少個橫縱格在你所有的代碼的最開始的位置調用一次這個sub即可

VBA里應該怎么定義一個動態(tài)的二維數組？

VBA中動態(tài)定義一個二維數組，案例代碼如下：//定義動態(tài)數組ttSub tt()Dim a() As IntegerReDim a(1 To 2, 1 To 1) As Integera(1, 1) 10i 10ReDim Preserve a(1 To 2, 1 To i) As IntegerMsgBox a(1, 1)End Sub

在VBA中如何用一個數組給另一個數組賦值？

通過數組循環(huán)的進行數組賦值。示例： Dim names 定義一個初始化數組 Dim dest(3) 定義一個要賦值的數組 賦值 names Array(小明, 小紅, 效力, 張明, 王武, , , , , , ) 通過Ubound()函數計算上界，LBound計算數組下界 For iLBound(dest) to UBound(dest) dest(i) names(i);//數組賦值 next i

ExcelVBA自定義函數的編寫，自定義數組？

你這個要求不能實現啊，我用了ParamArray 關鍵字，用來指定一個 任意元素個數 的數組

共參考：

---------

Function shuzu(ParamArray x())

Application.Volatile

Dim i, n, m, tmp

n UBound(x) - LBound(x) 1

If n Mod 2 0 Then tmp #Err_x(): GoTo 1000

n n / 2

m LBound(x)

For i 1 To n

tmp tmp x(m i - 1) * x(m i - 1 n)

Next

1000:

shuzu tmp

End Function

-----------

輸入公式的時候，需要 成對 的元素，套用你的公式如下：

shuzu((K5,L5,M7,N9),(M13,L15,K13,M17))

可以輸入任意 成對的 元素，比如使用10個參數：

shuzu((K5,L5,M7,N9,M10),(M13,L15,K13,M17,N20))