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 vote277 views1 answer
Vbnet dynamically change excel sheet name
VBA
0 vote282 views1 answer
How to make a a msgbpx in vbs
VBA
1 vote298 views1 answer
Excel vba saveas force overwrite
VBA
0 vote309 views1 answer
Remove last 8 characters from string vb
VBA
5 votes352 views1 answer
Excel vba last byte from INTEGER
VBA
1 vote261 views1 answer
Vba Remove Case Sensitivity
VBA
3 votes287 views1 answer
Vba folderexists
VBA
0 vote294 views1 answer
Vba createparameter null
VBA
0 vote283 views1 answer
Vba border weight
VBA
0 vote303 views1 answer
How to convert weeks to days into textbox with VB site:stackoverflow.com
VBA