2012-10-10 68 views
2

我用下面的代碼做aove任務:如何存儲一系列列值在2 d陣列

Dim Arr(2,150) 

Arr(0)=objsheet.Range("B16:B225").Value 

但我得到的錯誤:「下標超出範圍的錯誤」。首先是這樣的方式來複制單元格ito數組,而不使用任何循環或者是否有其他方式?

回答

2

不,它不是。

您需要:

Dim arr as Variant 

arr = yourSheet.Range("B16:B225").value 
+0

據工作只有當我刪除爲Variant。我正在使用Quick Test Professional。爲什麼這個showin錯誤,如果我正在修改 – Pramod

+0

我不知道Qucik Test Professional是什麼。猜測它不使用VBA,它使用的是不聲明類型的vbscript。既然你已經包含了VBA和Excel標籤 - 我認爲你的問題與Excel VBA相關。 – SWa