在Excel VBA中使用Dictionary对象

Question

我正在努力使我的Dictionary对象工作以返回所选参考编号的经济细节.

例如,我有以下参考号和相应的值,但是,不确定我是否可以使用Dictionary对象实现这一点,并且备选的建议将受到高度赞赏.

Ref No  Amount Price   Year
IB1232  1000   1.23    2011
IB1231  1000   3.23    2011
IB1233  1000   3.43    2011
IB1234  1000   3.43    2011

我认为可以通过形成Key和Value来实现参考及其相应的细节,但是无法实现..

Answer 1

@das_weezul

脚本库中的VBA中有一个Dictionary对象(您需要添加该引用才能使用它).字典具有一些额外的功能,例如在尝试访问密钥之前检查密钥是否存在的功能.

@Sky Cobb

是的,您可以使用Dictionary完成上述所有任务.语法是相同的,除了您应该为您添加到它的每个项目提供一个键.

Answer 2

我不知道你在VBA中指的是什么字典,因为Collection在VBA中调用具有所述功能的数据结构(但也许你编写了自己的Ditionary,在这种情况下我们需要代码才能够帮你).

如果我的示例正确,您想通过密钥"IB1232"访问例如{1000,1.23,2011}.您可以通过创建这样的集合集合轻松完成此操作:

Dim coll as new Collection
Dim data as new Collection

data.Add 1000
data.Add 1.23
data.Add 2011

coll.Add data, "IB1232"

要访问您的数据,只需通过密钥获取所需的记录(收集)

Debug.Print coll.Item("IB1232")(1) 'Prints 1000
Debug.Print coll.Item("IB1232")(2) 'Prints 1.23
Debug.Print coll.Item("IB1232")(3) 'Prints 2010

您还可以使用变量数组来存储数据