9

我正在从 Excel 中检索数据,并希望我的数组基于 0,但 Excel 返回 1。有没有一种相当简单的方法可以将数组从 1 更改为 0 基数?还是我只需要创建一个循环?

这是一个示例代码:

dim oData(,) as object
dim rng as range
dim wks as worksheet = xlApp.Activeworkbook.sheets(Sheet1)

rng=wks.Range("A1:B2")

oData=rng.Value2
4

1 回答 1

8

循环是最简单的选择。

Dim target as string(0 to oData.Length - 1)

For index = 1 to oData.Length 
   target(index - 1) = oData(index)
Next

那是从记忆中得出的,未经测试,但这很明显。

于 2012-05-23T15:45:21.350 回答