Vba nested 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 vote169 views1 answer
Excel vba round to whole number
VBA
0 vote159 views1 answer
VBA Sort RossetaCode
VBA
22 votes280 views1 answer
Excel vba check if directory exists
VBA
4 votes145 views1 answer
Excel vba determine number of elements in an array
VBA
1 vote143 views1 answer
Excel vba Populating a combobox on a userform from a range of cells
VBA
0 vote163 views1 answer
Excel vba set cell value to empty
VBA
2 votes147 views1 answer
Excel vba check if key is in collection
VBA
0 vote162 views1 answer
How to get value from clipboard in vbnet
VBA
0 vote151 views1 answer
How to carry text to the next line in a label in vb.net
VBA
5 votes157 views1 answer
Excel vba left word from Long Integer
VBA