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 vote345 views1 answer
Get current url vb.net
VBA
4 votes359 views2 answers
Excel vba last column with data
VBA
0 vote360 views1 answer
Xlbycolumns is not declared
VBA
0 vote346 views1 answer
Vba like with wildcard
VBA
0 vote341 views1 answer
Vba exit while
VBA
0 vote362 views1 answer
Vba check 32 or 64 bit
VBA
0 vote386 views1 answer
Excel vba add reference programmatically
VBA
4 votes344 views2 answers
Vba array length
VBA
0 vote394 views1 answer
Application.ExecutablePath VB.NET
VBA
0 vote375 views1 answer
Excel vba paste all to each sheet in workbook
VBA