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

22 votes310 views1 answer
Xl vba check for folder
VBA
1 vote196 views1 answer
Excel vba to lower case
VBA
1 vote192 views1 answer
Excel how to format bytes as KB, MB, GB
VBA
0 vote180 views1 answer
Select case vba
VBA
0 vote172 views1 answer
Vb.net round to 2 decimal places
VBA
0 vote182 views2 answers
Excel vba protect cells with formula
VBA
0 vote178 views1 answer
Vba type variable
VBA
0 vote189 views1 answer
Vba get workbook name
VBA
1 vote171 views1 answer
Vbscript convert ascii code to character
VBA
4 votes176 views2 answers
Vba array length
VBA