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 vote267 views1 answer
How to sort datagridview in vb.net
VBA
0 vote308 views1 answer
Vba simple quote
VBA
0 vote286 views1 answer
Excel vba populate array with cell values
VBA
0 vote320 views1 answer
Vba cell all borders
VBA
0 vote325 views1 answer
Reference to a non-shared member requires an object reference
VBA
0 vote312 views1 answer
Arq linux
VBA
0 vote299 views1 answer
Vba add month to date
VBA
0 vote303 views1 answer
Vba dictionary clear
VBA
1 vote295 views2 answers
Vba remove first 2 characters from string
VBA
0 vote310 views1 answer
Excel vba join variant array
VBA