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

3 votes374 views1 answer
Vba not equal
VBA
0 vote354 views1 answer
Vb net check if file exists
VBA
8 votes464 views1 answer
Excel vba make a short integer from two bytes
VBA
0 vote358 views2 answers
Vba remove line breaks
VBA
0 vote346 views1 answer
Vba file size
VBA
0 vote349 views1 answer
Dlete rows with blanks and space " " vba
VBA
0 vote348 views1 answer
Vba line feed
VBA
0 vote400 views1 answer
Excel vba set cell value to empty
VBA
0 vote377 views1 answer
Vba integer to double
VBA
15 votes510 views1 answer
Excel vba wait
VBA