Réglage de l'Élément de propriété d'une Collection en VBA

Je suis surpris de voir combien dur a été de le faire, mais j'imagine que c'est une solution rapide, je vais donc demander ici (une recherche google et de la documentation, mais ni aidé). J'ai un code qui ajoute des éléments d'une collection en utilisant les touches. Quand je tombe sur une clé existe déjà dans la collection, je veux simplement définie par l'ajout d'un numéro à la valeur actuelle.

Voici le code:

If CollectionItemExists(aKey, aColl) Then 'If key already has a value
    'add value to existing item
    aColl(aKey).Item = aColl(aKey) + someValue
Else
    'add a new item to the collection (aka a new key/value pair)
    mwTable_ISO_DA.Add someValue, aKey
End If

La première fois que j'ai ajouter la paire clé/valeur dans la collection, je suis l'ajout d'un entier comme valeur. Quand je viens sur la touche de nouveau, j'essaie d'ajouter un autre entier de la valeur, mais cela ne fonctionne pas. Je ne pense pas que le problème réside dans n'importe quel type d'objet mis-match ou quelque chose de similaire. Le message d'erreur j'ai actuellement est

Erreur D'Exécution 424: Objet Requis

Cette réponse à un précédent, liés à la question doit également répondre à ta question: stackoverflow.com/questions/5709444/modify-value-by-key/... . La version courte est que les Collections ne fonctionnent pas comme des tableaux; vous ne pouvez pas réaffecter un "élément". Les réponses d'autres personnes ont déjà donné vous êtes bien d'autres moyens d'obtenir ce que vous voulez.

OriginalL'auteur winnicki | 2011-09-26