[Macro Excel] variable de type tableau

jodko -  
 Jodko -
Bonjour,

J'essaie de construire une macro excel pour pouvoir exploiter les valeurs de cellules contenues dans une plage si les cellules répondent à un critère particulier.

J'essaie de me servir d'une variable de type tableau pour stocker ces valeurs afin de pouvoir ensuite en extraire moyenne, écart type, min, max, etc.

Mon problème est que je n'arrive pas à remplir le tableau.

Le code :

[...]

Dim Maille As Integer
Dim Nb_Heures As Integer
Dim Nb_Heures_Max As Integer
Dim Liste() As Range

[...]

While IsEmpty(ActiveCell) = False

If ActiveCell.Value = "Critère" Then

ActiveCell.Offset(0, 18).Activate
If ActiveCell.Value < Nb_Heures + Maille And ActiveCell.Value >= Nb_Heures Then
Liste() = Union(Liste(), ActiveCell)
End If
End If

ActiveCell.Offset(1, 0).Select

Wend

[...]

Avec F8, j'ai une Erreur d'incompatibilité de type sur la ligne en gras italique.

Merci de votre aide !

Jodko.
A voir également:

2 réponses

eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 282
 
Bonsoir,

au lieu de :
Liste() = Union(Liste(), ActiveCell)

essaie avec :
i=i+1
Liste(i)=activecell.value

Mais tu devrais reprendre ton code pour éviter les .select qui ralentissent

eric
0
Jodko
 
Ca marche, merci beaucoup !
0