Hash em VBA

Quanto mais eu conheço VBA.. mais eu dou valor ao Perl!!
Olha que complicação pra criar um Hash:

Sub aaa()
    Set d = CreateObject("Scripting.dictionary")
    d.Add "A", "B"
    d.Add "C", "D"
    a = d.items
    b = d.keys
    For i = 0 To d.Count - 1
         MsgBox a(i) & ", " & b(i)
    Next i
End Sub

Em Perl, bastaria %aaa = ( )....