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

1 vote207 views1 answer
Extract the second word in a text in excel
VBA
0 vote249 views1 answer
Wpf dark title bar
VBA
0 vote205 views1 answer
Vba remove the first character of string
VBA
1 vote189 views1 answer
Excel vba convert cells(1,1) into A1 and vice versa
VBA
0 vote202 views1 answer
Loop through each cell in dgv vbnet
VBA
0 vote195 views1 answer
Vbnet check if number is even or odd
VBA
0 vote203 views1 answer
Vba copy file
VBA
8 votes224 views1 answer
Excel vba determine number of elements in a 2D array
VBA
0 vote195 views1 answer
Excel vba disable alerts
VBA
0 vote214 views1 answer
Test if form is open vb
VBA