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 2496 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!

A voir également:

VBA Appeler une sous-macro avec variables
Appeler en privé - Guide
Macro word - Guide
Macro logiciel - Télécharger - Organisation
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Macro recorder - Télécharger - Confidentialité

1 réponse

Réponse 1 / 1

ghuysmans99 Messages postés 2496 Date d'inscription jeudi 14 juillet 2005 Statut Contributeur Dernière intervention 5 juin 2016 338
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

Discussions similaires

VBA : Range avec références variables..

programme qui n'affiche pas le mot secret

ouverture d'un fichier excel à partir d'un code VBA

"L'indice n'appartient à la sélection" + VBA

Comment tomber directement sur la messagerie

Discussions similaires

Newsletters