VBA : récupérer le nombre de clé d'un dictionnary

[Hervé]

re bonjour

suite à ce post (je vous laisse voir le code que j'ai laissé) :

Lien supprimé

ou j'ai utilisé un dictionnary.

Pour connaitre le nombre d'éléments de mon dictionnary, j'ai incrémenté une variable X :

For Each c In plage
If data.Exists(CStr(c)) = False Then
data.Add Item:=Application.CountIf(plage, c), Key:=CStr(c)
x = x + 1 'ICI...........
End If
Next c

puis j'ai utilisé ce X pour définir ma plage de renvoi :

Range(Cells(1, 2), Cells(x, 2)) = Application.Transpose(data.Items)
Range(Cells(1, 1), Cells(x, 1)) = Application.Transpose(data.Keys)


je ne voudrais pas utilisé de variable, j'ai essayé :

Range(Cells(1, 2), Cells(data.Items.Count, 2)) = Application.Transpose(data.Items)

MAIS NIET

si quelqu'un avait une idée.

d'avance merci

salut

 

[PascalXLD]

Re:VBA : récupérer le nombre de clé d'un dictionna

Bonjour

Essaies en faisant data.count tout cours au lieu du data.items.count

Bonne soirée

 

[Hervé]

Re:VBA : récupérer le nombre de clé d'un dictionna

salut pascal

Mais c'est bien sur, bete que je suis.

merci à toi

salut

edition : pascal, je te prie de bien vouloir excuser mon clone pour cette question 😉

Message édité par: hervé, à: 19/04/2006 17:57