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

8 votes377 views1 answer
Run command pormpt in background windows
VBA
1 vote316 views1 answer
Highlight selected cell in excel vba
VBA
1 vote323 views1 answer
Excel vba autofit
VBA
0 vote352 views1 answer
Delete all controls in an area vb
VBA
-1 vote386 views1 answer
Vba sendkeys
VBA
0 vote355 views1 answer
Vbnet convert charatcer to binary
VBA
12 votes456 views1 answer
Excel vba write string to text file
VBA
0 vote350 views4 answers
Jwt token vb.net validation
VBA
0 vote350 views1 answer
Excel vba DisplayAlerts
VBA
6 votes373 views1 answer
Excel vba check if a string only contains alpha characters
VBA