Dim arr1(1 To 100, 1 To 2),arr = [a2:d100],其中100,如何用變數取代 - Excel程式區

[發問] Dim arr1(1 To 100, 1 To 2),arr = [a2:d100],其中100,如何用變數取代

1^# 跳轉到 »

發表於 2021-2-22 08:49 | 顯示全部帖子

回復 4# dou10801

Dim arr1()
mas = 999
ReDim arr1(1 To mas, 1 To 2)
Debug.Print UBound(arr1, 1), UBound(arr1, 2)

靜思自在 : 【停滯不前，終無所得】人都迷於尋找奇蹟，因而停滯不前；縱使時間再多、路再長，也了無用處，終無所得。