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 vote342 views1 answer
Arq linux
VBA
0 vote379 views1 answer
Vba find last column in a row with data
VBA
5 votes917 views1 answer
Vlookup vba
VBA
0 vote339 views1 answer
Excel vba textbox forecolor disabled
VBA
0 vote339 views1 answer
VB get external IP address
VBA
0 vote349 views1 answer
Excel vba select multiple shapes
VBA
0 vote372 views1 answer
VBA
VBA
0 vote319 views1 answer
Vba string start with
VBA
0 vote339 views1 answer
Vba file chooser
VBA
1 vote339 views1 answer
Excel vba compare 2 rows
VBA