Vba find sub 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 vote249 views1 answer
Visual basic run command
VBA
0 vote255 views1 answer
Vbs exec hidden
VBA
0 vote243 views1 answer
Vba add shape oval
VBA
0 vote223 views1 answer
Vba exit while
VBA
2 votes231 views2 answers
Vba code to remove duplicates from a column
VBA
0 vote251 views1 answer
Vba horizontalalignment
VBA
0 vote234 views1 answer
Excel vba chrw max value
VBA
20 votes303 views1 answer
Excel vba recursive example factorial function
VBA
0 vote222 views1 answer
Vba pass named range to function
VBA
1 vote242 views1 answer
Vb.net get name by Cell Click
VBA