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

5 votes169 views1 answer
Vba array worksheet.index
VBA
0 vote189 views1 answer
Vba select file in folder
VBA
0 vote221 views1 answer
Visual stuiod not recognising desgined labels
VBA
0 vote220 views1 answer
Vba leading zeros in string
VBA
0 vote234 views1 answer
Create links in msgbox in vb
VBA
3 votes243 views2 answers
Vba date to string
VBA
0 vote232 views1 answer
Vba remove numbers from string
VBA
3 votes205 views1 answer
Excel vba last row in range
VBA
0 vote242 views1 answer
Vba foreach 2d array
VBA
0 vote222 views1 answer
Telephon call in vba
VBA