VBA Appeler une sous-macro avec variables

Résolu/Fermé
pampiou
Messages postés
20
Date d'inscription
mercredi 5 mai 2010
Statut
Membre
Dernière intervention
2 octobre 2013
- 19 juil. 2010 à 15:49
ghuysmans99
Messages postés
2493
Date d'inscription
jeudi 14 juillet 2005
Statut
Contributeur
Dernière intervention
5 juin 2016
- 19 juil. 2010 à 18:44
Bonjour à tous,

J'ai un souci au niveau de mes macros, donc si quelqu'un se sent le courage de m'aider, merci d'avance!!!

Dans mon programme (sous Excel 2007), je fais appel à une sous-macro afin de limiter la répétition de lignes identiques. Pour cela, mon code est :

j = 1

For i = 4 To ligne 'Boucle appelée plusieurs fois
If Cells(i, "E") = "ABCD" Then
Copy
j = j + 1
End If
Next

___________________________________________________________
Sub Copy(i, j)
Rows(i).Copy
Sheets(5).Rows(j).PasteSpecial
End Sub


Dans ma macro "Copy", je dois reprendre les valeurs de i et j présente dans ma macro principale.

Merci d'avance de votre aide!

1 réponse

ghuysmans99
Messages postés
2493
Date d'inscription
jeudi 14 juillet 2005
Statut
Contributeur
Dernière intervention
5 juin 2016
334
19 juil. 2010 à 18:44
j = 1
For i = 4 To ligne 'Boucle : contenu appelé plusieurs fois
  If Cells(i, "E") = "ABCD" Then
    Copy i,j
    j = j + 1
  End If
Next

Sub Copy(i, j)
  Rows(i).Copy
  Sheets(5).Rows(j).PasteSpecial
End Sub 
5