Eliminer une ligne

Résolu
nicobentz Messages postés 17 Date d'inscription lundi 16 janvier 2006 Statut Membre Dernière intervention 2 octobre 2006 - 2 oct. 2006 à 12:15
Molenn Messages postés 797 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 23 février 2011 - 2 oct. 2006 à 12:31
bonjour,
petite question bête mais après recherche, je n'arrive pas à bien résoudre ce problème:

je fais un test pour savoir si une cellule est vide sur une colonne j à chaque ligne i. Je cherche à éliminer la ligne i (intégralement) qui repond positivement au test.

ca coince un peu, pourriez vous m'aider?
merci à tous

1 réponse

Molenn Messages postés 797 Date d'inscription mardi 7 juin 2005 Statut Membre Dernière intervention 23 février 2011 7
2 oct. 2006 à 12:31
A quel niveau tu coinces ?

Pour tester si une cellule de ta colonne j est vide, tu peux faire une boucle du style

For i = 0 to NbdeLignesàVérifier
      If cells (i, j).value = "" then
         'Code à appliquer
      End if
next i

Pour supprimer ta ligne :
Dans la même boucle, la variable i contient le numéro de la ligne :
Donc, tu peux récupérer le code à partir de l'assistant macro, mais ça sera quelque chose du style :
Temp = i & ":" & i
rows(temp).delete

Molenn

(C'est pas le code exact, c'est juste l'idée. J'ai pas Excel sur le PC sur lequel je suis là ^^)
3
Rejoignez-nous