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 vote352 views1 answer
Vba dropdown event
VBA
0 vote350 views1 answer
Vba exit while
VBA
1 vote353 views1 answer
How to do error handling in access vba
VBA
0 vote356 views1 answer
Excel run macro every 5 minutes
VBA
0 vote389 views1 answer
COMO GRAVAR U VALOR NO ARQUIVO APPSETINGS EM VB NET
VBA
0 vote364 views1 answer
Vbnet hex to binary
VBA
0 vote366 views1 answer
Vba code to open a file with login rights
VBA
0 vote375 views1 answer
Vba listbox remove all items
VBA
0 vote365 views1 answer
Vba get application version
VBA
0 vote400 views1 answer
Excel vba Column Name from Column Number
VBA