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 vote233 views1 answer
Vba remove the first character of string
VBA
3 votes228 views1 answer
Vba double quote
VBA
0 vote232 views1 answer
Vbscript check if string is empty
VBA
1 vote223 views1 answer
Export datagridview to excel vb.net
VBA
0 vote223 views1 answer
Vba like with wildcard
VBA
0 vote233 views1 answer
Excel vba copy range with filter
VBA
0 vote232 views1 answer
Send text to clipboard vb.net
VBA
2 votes252 views2 answers
Excel vba if sunday or staurday
VBA
0 vote227 views1 answer
Set column width of datagridview vb.net
VBA
0 vote235 views1 answer
Excel vba select multiple shapes
VBA