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

1 vote334 views1 answer
Excel vba first row in range
VBA
0 vote348 views1 answer
Excel vba paste all to each sheet in workbook
VBA
0 vote321 views1 answer
Vlookup columns not next to each other
VBA
0 vote323 views1 answer
Find the name of the last excel sheet vb
VBA
0 vote350 views1 answer
Add text to Shape VBA
VBA
0 vote336 views1 answer
Enable macros on opening workbook vba
VBA
0 vote341 views1 answer
Vbs exec hidden
VBA
0 vote375 views1 answer
Application.ExecutablePath VB.NET
VBA
1 vote331 views1 answer
Vba delete file
VBA
0 vote329 views1 answer
Vba change named range address
VBA