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

18 votes281 views3 answers
Excel-vba make integer
VBA
3 votes143 views1 answer
Vba make long from two shorts
VBA
0 vote140 views2 answers
Excel vba close without saving
VBA
2 votes147 views1 answer
Excel vba date to string conversion
VBA
0 vote171 views1 answer
Create new worksheet excel visual basic
VBA
2 votes144 views1 answer
Excel vba check if string entirely numeric
VBA
0 vote151 views1 answer
String contins in vba
VBA
0 vote135 views1 answer
Replace spaces with underscores vbnet
VBA
0 vote155 views1 answer
Vba check if class implements interface
VBA
0 vote152 views1 answer
Vba range clear formatting
VBA