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

20 votes535 views1 answer
Excel vba factorial
VBA
1 vote232 views2 answers
Excel vba password protect
VBA
0 vote223 views2 answers
How to concatenate more than 40 lines in vba
VBA
0 vote227 views1 answer
Excel vba extract year
VBA
5 votes251 views1 answer
Excel vba how to unit test vba code
VBA
0 vote243 views1 answer
Excel filter by date not working vba
VBA
0 vote230 views1 answer
Excel vba automatic calculation
VBA
8 votes497 views1 answer
Vba make a short integer from two bytes
VBA
3 votes221 views1 answer
Excel vba last row in range
VBA
0 vote229 views1 answer
Vb run command
VBA