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 vote369 views1 answer
Excel last used row
VBA
0 vote332 views1 answer
Excel vba populate array with cell values
VBA
6 votes396 views1 answer
Excel vba check if a string only contains alpha characters
VBA
1 vote369 views1 answer
Vba loop through files in folder
VBA
0 vote357 views1 answer
Vba collection key list
VBA
0 vote333 views1 answer
Dynamically change drop down list visual basic
VBA
0 vote358 views4 answers
How to continue formula in below line in vba code
VBA
1 vote350 views1 answer
Vba reverse string
VBA
1 vote356 views2 answers
Vba function return array
VBA
3 votes360 views1 answer
Extract the nth word from a text string
VBA