Création d'une liste via une boucle

DGVDR Messages postés 158 Date d'inscription   Statut Membre Dernière intervention   -  
DGVDR Messages postés 158 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je pars d'un tableau, dans ce tableau, chaque case de la colonne D peut avoir pour valeur -1 ou 1.
( Ce chiffre variant en fonction de la date)

J'aimerais "cacher' les lignes ou la case D est = 1 ( et donc n'avoir que celle ou la case D=-1.

Pour ça j'ai tenter :

Dim i As Integer
For i = 1 To 100
If [Di<0] Then
EntireRow(i).Hidden = True
Else: EntireRow(i).Hidden = False

End

Sans grand succès.

Auriez-vous l'idée de ce qui cloche ?

Merci d'avance,
DGVDR

4 réponses

  1. Yoda
     
    Bonjour,

    Si c'est une macro Excel, voilà la syntaxe correcte.

    Sub test()
    Dim i As Integer
    For i = 1 To 100
    Rows(i).Select
    If Range("D" & i).Value < 0 Then
        Selection.EntireRow.Hidden = False
    Else
        Selection.EntireRow.Hidden = True
    End If
    Next
    End Sub


    A+
    1
  2. DGVDR Messages postés 158 Date d'inscription   Statut Membre Dernière intervention  
     
    Parfait ça marche.

    Un grand merci.
    0
  3. DGVDR Messages postés 158 Date d'inscription   Statut Membre Dernière intervention  
     
    Une dernière indication...

    J'aimerai que certaines lignes ne fassent pas partie de la boucle ( exclure des i dans mon 1 To 100 )

    Est-ce possible?
    0
    1. Yoda
       
      Bien sur c'est possible, il suffit de completer condition If

      If Range("D" & i).Value < 0 and Range("E" & i).Value = 2012 Then 'par exemple
      0
  4. DGVDR Messages postés 158 Date d'inscription   Statut Membre Dernière intervention  
     
    Bonjour,

    Ce n'est pas exactement ce que je souhaitais, car les lignes à exclure dépendait de la valeur de ("D" & i).

    J'ai résolu mon problème en créant plusieurs boucles,
    La première s'arrêtant à L-1 de la ligne devant être exclu de 'l'analyse'
    La seconde reprenant 'l'analyse' à L+1.
    Et sa autant de fois qu'il y a de ligne à exclure...

    Merci pour tes conseils.
    0