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 vote156 views1 answer
Arq linux
VBA
0 vote163 views1 answer
Vba table header name
VBA
0 vote142 views1 answer
Enter into cells data grid view
VBA
1 vote168 views1 answer
Extract the second word in a text in excel
VBA
0 vote150 views1 answer
Vba static variable
VBA
0 vote146 views1 answer
VB Error Code BC30201
VBA
0 vote158 views1 answer
Date as number vb
VBA
0 vote144 views1 answer
Telephon call in vba
VBA
0 vote149 views1 answer
Remove last 8 characters from string vb
VBA
0 vote153 views1 answer
Excel vba linter
VBA