Application.Dictionary

This property returns the dictionary object for storing custom data as name-value pairs.

This property is read only.

Syntax Parameters Return Value
- - Object

SVB Example

Storing and retrieving values in the global dictionary: 

Option Base 1
Option Explicit
Sub Main
    Dim d As Dictionary
    Set d = Application.Dictionary

    'Add key-value pair to dictionary.
    d.Set("First", 35)

    'Retrieve value using key.
    'Also provide default value for when key not found.
    Dim dVal As Double
    dVal = d.Get("First",0)

    MsgBox CStr(dVal)
End Sub