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 vote237 views1 answer
Vba remove last vbcrlf
VBA
0 vote250 views1 answer
Power query M substract minimum value of column -dax
VBA
1 vote280 views1 answer
Find and replace textbox
VBA
4 votes250 views1 answer
Excel vba how to programmatically remove the marching ants after range copy
VBA
3 votes237 views1 answer
Excel vba export sheet as a csv without losing focus of my current workbook
VBA
9 votes516 views2 answers
Excel vba convert 2 Short integers to a Long integer
VBA
22 votes557 views1 answer
Xl vba check for folder
VBA
0 vote246 views1 answer
Vba word open document read only
VBA
1 vote251 views1 answer
Vbs run
VBA
2 votes298 views1 answer
Vba round number
VBA