Item wijzigen in een Collectie, kan dat?

[sylvester-ponte]

hallo

ik heb een collectie met namen als Key en getallen als Item
hoe wijzig ik het Item? bv verhogen met 1 of zo

Sub test()
    Dim Col As New Collection
    Col.Add Item:=1, Key:="Naam1"
    a1 = Col("Naam1")   'dit gaat nog goed a1 wordt 1
    Col("Naam1") = 2    'dit gaat fout. Hoe verandert je de waarde van het Item
                                                    'dat bij de Key "Naam1" hoort
End Sub

groet sylvester

 

[WHER]

Zie bijlage, deze oplossing wordt gesuggereerd door Andy Pope.
Ik meen ergens gelezen te hebben dat Collections "read only" zijn.
Ga naar Module 1 en stap via F8 door de macro.

 

[sylvester-ponte]

hallo WHER

Bedankt voor de benadering via een klas:thumb:

ik heb een klas "getal" gemaakt enz...zie sub "test"

groet sylvester