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 vote144 views1 answer
How to make a if statement with vbs
VBA
0 vote216 views1 answer
Sort dictionary by key vba
VBA
0 vote199 views1 answer
Vlookup columns not next to each other
VBA
0 vote193 views1 answer
Excel vba address not absolute
VBA
0 vote197 views1 answer
VBA is form loaded
VBA
0 vote146 views1 answer
Vba set vs dim
VBA
0 vote202 views1 answer
Excel vba DisplayAlerts
VBA
5 votes221 views1 answer
Vba low byte from INTEGER
VBA
0 vote228 views1 answer
Vba registry settings
VBA
5 votes201 views1 answer
Excel vba low byte from INTEGER
VBA