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

4 votes181 views2 answers
Vba array length
VBA
0 vote173 views1 answer
Vbnet get file name from path
VBA
0 vote180 views1 answer
Excel VBA web scraping
VBA
0 vote178 views1 answer
Vb window.minimize
VBA
0 vote182 views1 answer
Excel vba scroll to cell
VBA
3 votes195 views1 answer
Excel vba export sheet as a csv without losing focus of my current workbook
VBA
0 vote176 views1 answer
Excel vba center userform
VBA
0 vote189 views1 answer
Limit combobox to list vba
VBA
1 vote200 views1 answer
Sort using vba
VBA
0 vote190 views1 answer
Vba apostrophe chr
VBA