代码之家 › 专栏 › 技术社区 › R zu

Excel VBA:使用字典作为成员变量创建类

excel-vba vba excel

-1

R zu · 技术社区 · 7 年前

Scripting.Dictionary

但我觉得马修的答案不适合Excel VBA。

Option Explicit
Private dict As Scripting.Dictionary

Private Sub Class_Initialize()
    Set dict = New Scripting.Dictionary
End Sub

我得到了dict的错误“用户定义的类型没有定义”。

1 回复 | 直到 7 年前

1

2

3-14159265358979323846264 7 年前

您需要从vbe、工具引用添加对Microsoft脚本运行时的引用,然后向下滚动并选中Microsoft脚本运行时的选项:


   
选项显式





然后您甚至可以将代码简化为:

Option Explicit
Private dict As New Scripting.Dictionary

Private Sub Class_Initialize()

End Sub




Option Explicit
Private dict As Object ' Scripting.Dictionary

Private Sub Class_Initialize()
    Set dict = CreateObject("Scripting.Dictionary") 'New Scripting.Dictionary
End Sub