manytime
Messages postés23Date d'inscriptionmercredi 18 janvier 2006StatutMembreDernière intervention 2 avril 2008
-
4 avril 2007 à 11:05
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 2011
-
4 avril 2007 à 11:25
Salut à tous.
J'ai deux feuilles Excel avec dans la première colonne de chaque feuille des numéros.
j'aimerais à partir d'une macro de préférence supprimer les lignes dans la feuille 1 où un numéro est égal à un dans la liste de la feuille 2.
MERCI
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 4 avril 2007 à 11:16
Salut,
il te suffit de faire une boucle de chaque cellule de ta première colonne, et de boucler sur la seconde pour vérifier.
Pas du tout testé mais en gros,
Dim i as Integer, j as integer
for i = X1 To 1 step -1 'X1 est la derniere ligne de feuile 1
For j = X2 To 1 step -1 'X2 est la derniere ligne de feuile 2
if sheets(2).Range("A" & j).Value = sheets(1).Range("A" & i).Value then
sheets(1).Range("A" & i).Delete xlUp
end if
next j
next i
@++
<hr width="100%" size="2" />
--Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
/DIV>
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 4 avril 2007 à 11:25
Salut Drikce ;)
oui, il m'en fallait un unique. Bien qu'il soit sur le net en image normale, en coup de crayon, je pense que ça le fait !
(sloubi1, sloubi2, sloubi3...
)
@++
<hr width="100%" size="2" />
--Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
/DIV>