Excel請問EXCEL中如何將一列賦值給一個數組？

Excel表的單元格區域是一個二維數組dim arrarr=Sheet3.Range("D7:D9")'這時的arr得到的是二維數組'你要轉換成1維數組，先聲明一個動態數組再重定義為1維數組dim brr()redim brr(1 to ubound(arr))'再重新將二維轉一維for i = 1 to ubound(arr) brr(i)=arr(i,1)next'如果你是要間隔寫進去for i = 1 to ubound(arr) step 2 brr(i)=arr(i,1)next