LibreOfficeのVBで連想配列を使用する

Version: 7.3.7.2

EnumerableMapを使用する。

Dim map As Object
map = com.sun.star.container.EnumerableMap.create("string", "any")
map.put("key", 123)
If map.containsKey("key") Then
    MsgBox map.get("key")
End If