Dictionary printer for Visual Basic

PrintDict.vba

Function PrintDict(Dict as Dictionary, Optional ByVal Stack as String = "")
  For Each Key In Dict.Keys()
    If TypeOf Dict(Key) Is Dictionary Then
      Debug.Print Stack & Key & ":"
      PrintDict Dict(Key), Stack & "  "
    Else
      Debug.Print Stack & Key & ": " & Dict(Key)
    End If
  Next
End Function

Sure 👍 you can achieve the same with any Dict type just by modifying the code a bit. The basic idea of how the inputted Dict is looped through should be the same