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

3 votes240 views1 answer
Vba double quote
VBA
0 vote242 views1 answer
Filesystemobject vba reference
VBA
0 vote258 views2 answers
Get unique random number in vb.net
VBA
0 vote265 views1 answer
Vba cell all borders
VBA
0 vote218 views1 answer
Excel vba disable screen update
VBA
2 votes241 views1 answer
Excel vba extract file name
VBA
0 vote235 views1 answer
Menus act like radio buttons vb.net
VBA
3 votes258 views1 answer
Extract word in a text in excel
VBA
0 vote226 views1 answer
Vba loop through table
VBA
0 vote246 views1 answer
Vbnet round to nearnest thousand
VBA