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

1 vote272 views1 answer
Excel vba get column name from number
VBA
8 votes325 views1 answer
Excel vba determine number of elements in a 1D array
VBA
6 votes326 views1 answer
Excel vba check if a string only contains alpha characters
VBA
0 vote266 views1 answer
Vbnet add new ecel sheet
VBA
4 votes280 views1 answer
Excel vba check cell not empty
VBA
0 vote289 views1 answer
Excel vba DisplayAlerts
VBA
0 vote307 views1 answer
Excel vba Column Name from Column Number
VBA
3 votes297 views1 answer
Vba make long from two words
VBA
0 vote265 views1 answer
Excel vba hide columns
VBA
0 vote297 views1 answer
Vba remove last vbcrlf
VBA