collection key spg
Hej E.Jeg har denne kode:
Sub TestCollection()
Dim i As Integer
Dim TestCollection As New Collection
TestCollection.Add "Overskrift 1", "jakob"
TestCollection.Add "Overskrift 2", "Anders"
TestCollection.Add "Overskrift 3", "Kathrine"
i = 1
For Each Key In TestCollection
MsgBox TestCollection.Item(i)
i = i + 1
Next
Men hvordan kan jeg få fat i Key'en (navnene)
Jeg vil gerne kunne benytte de værdiger som står på key'ens plads.
Er det til at forstå.
