Dim instance As Dictionary Dim key As String Dim value As Object value = instance(key) instance(key) = value