Vba nested dictionary

Sub NestedDictionary()
    Dim d1, d2
    Set d1 = CreateObject("Scripting.Dictionary")
    Set d2 = CreateObject("Scripting.Dictionary")

    d1.Add "BPH", "Hello"
    d2.Add "Shaun", d1
    Debug.Print d2("Shaun").Item("BPH")
End Sub

Source: stackoverflow.com

Similar codes

0 vote170 views1 answer
Vba dictionary length
VBA
1 vote164 views1 answer
Excel vba unload userform
VBA
0 vote157 views1 answer
Vba border weight
VBA
0 vote155 views1 answer
Vba verticalalignment
VBA
0 vote176 views1 answer
Delete all controls in an area vb
VBA
25 votes306 views2 answers
Excel vba folder exist
VBA
2 votes161 views1 answer
Vba ado ace sql alias ignored for calculated column
VBA
0 vote169 views1 answer
Dlete rows with blanks and space " " vba
VBA
0 vote161 views1 answer
Vbscript remove spaces from string
VBA
0 vote183 views1 answer
Vba multiple optional arguments
VBA