Créer une boucle sur vba

Fermé
rodlan - 13 déc. 2007 à 12:07
phil232 Messages postés 607 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 31 janvier 2008 - 13 déc. 2007 à 16:54
Bonjour,
je voudrais créer un programme qui compare la valeur d'une cellule d'une feuille1 à celles d'une feuille2 et supprime cette valeur des deux feuilles, si elle est la même ou ne fait rien dans le cas contraire; mais passe à la seconde valeur de la feuille1 et recommence la procédure.

P.S.: Dans les deux feuilles, les valeurs sont disposées sur une colonne
le nombre de valeurs sur une colonne est variable dans le temps

merci

1 réponse

phil232 Messages postés 607 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 31 janvier 2008 178
13 déc. 2007 à 16:54
for i = 1 to 100 ' ou autre limit
if Worksheets("Sheet1").Range("A" & i) = Worksheets("Sheet2").Range("A" & i) then
Worksheets("Sheet1").Range("A" & i) = ""
Worksheets("Sheet2").Range("A" & i) = ""
endif
next


au lieu de "for i = 1 to 100" tu peux aussi créer un Range nommé (plus pratique) et boucler avec for each c in range("MyRange")
0