Vba find sub 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 vote153 views1 answer
Vba change named range address
VBA
0 vote150 views1 answer
Excel vba disable copy paste
VBA
0 vote152 views1 answer
Vbnet hex to binary
VBA
3 votes167 views2 answers
Vba active workbook path
VBA
0 vote161 views1 answer
Excel vba first working day month
VBA
5 votes179 views1 answer
Excel vba get low byte from INTEGER
VBA
0 vote168 views1 answer
VBA is form loaded
VBA
0 vote188 views1 answer
Visual basic run command
VBA
6 votes167 views1 answer
Excel vba check if a string only contains letters
VBA
0 vote151 views1 answer
Vb get ip address
VBA