Tableau dynamique vba!

Naruto87 -  
pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour,

Je crée un tableau dynamique sous vba qui s'alimente par une plage à travers une boucle sur les cellules de cette plage qui vérifient une condition (tableau (i,1)=cells(i,1).value SI cells(i,1) =100 Sinon rien faire). du coup j'ai un tableau qui contient des blanc (du fait des cellules qui ne vérifient pas la condition). Comment pourrais-je l'avoir sans bllancs (elements vides)?
Merci par avance!

1 réponse

  1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 772
     
    Bonjour,

    Il te faut redimensionner ton tableau, grâce à une variable d'incrémentation (Cpt dans l'exemple) Si ta condition est vérifiée.

    Exemple :
    Dim Cpt As Long, i As Long, Tb()
    Cpt = 0
    For i = 1 To 1000
        If Cells(i, 1) = 100 Then
            ReDim Preserve Tb(Cpt)
            Tb(Cpt) = Cells(i, 1)
            Cpt = Cpt + 1
        End If
    Next

    Avant, j'arrivais jamais à finir mes phrases... mais maintenant je
    0