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 vote236 views1 answer
Vbs send keys
VBA
1 vote243 views1 answer
Add rows to datagridview vb.net
VBA
0 vote245 views1 answer
Returns an array from function vba
VBA
2 votes241 views1 answer
Excel vba check if string entirely alpha
VBA
0 vote235 views1 answer
Vba get relative cell address
VBA
4 votes223 views1 answer
Excel formula for last non-empty cell in a column
VBA
0 vote265 views1 answer
Find database connection string vb
VBA
4 votes227 views1 answer
Excel vba determine number of elements in an array
VBA
1 vote231 views1 answer
Vba declare api 64 bit 32 bit
VBA
0 vote237 views1 answer
Excel vba formatconditions range
VBA