private sub exel(...)
Sheets("1").Cells(nb, 3).Value = date_fermeture
Sheets("1").Cells(nb, 4).Value = client
Sheets("1").Cells(nb, 5).Value = num_client
Sheets("1").Cells(nb, 6).Value = description
Sheets("1").Cells(nb, 7).Value = montant
Sheets("1").Cells(nb, 8).Value = premier
Sheets("1").Cells(nb, 11).Value = rang
...
Mon problème est que j'ai 52 feuilles et je voudrais savoir si il y a un
moyen de ne pas refaire 52 fois la private sub
Je précise ma question :
Es ce que je peux utiliser 52 fois la même macro mais à chaque fois que je
change de feuilles le nom change pour la feuille courante...pour que les
informations s'inscrive sur la page courante
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichDenis
Bonjour Isabelle,
Tu places ta macro dans un module standard, si ce n'est déjà fait et, tu enlèves "Sheets("1")." en début de chacune de tes lignes de code... de cette manière, c'est la feuille active qui va recevoir les données à chaque fois que tu vas faire intervenir cette macro.
'----------------------- private sub exel(...) Cells(nb, 3).Value = date_fermeture Cells(nb, 4).Value = client Cells(nb, 5).Value = num_client Cells(nb, 6).Value = description Cells(nb, 7).Value = montant Cells(nb, 8).Value = premier Cells(nb, 11).Value = rang '.../... End sub '-----------------------
Salutations!
Salutations!
"Isabelle Chapados" a écrit dans le message de news:
Bonjour à tous,
j'ai une macro qui est relié avec une page
private sub exel(...) Sheets("1").Cells(nb, 3).Value = date_fermeture Sheets("1").Cells(nb, 4).Value = client Sheets("1").Cells(nb, 5).Value = num_client Sheets("1").Cells(nb, 6).Value = description Sheets("1").Cells(nb, 7).Value = montant Sheets("1").Cells(nb, 8).Value = premier Sheets("1").Cells(nb, 11).Value = rang ... Mon problème est que j'ai 52 feuilles et je voudrais savoir si il y a un moyen de ne pas refaire 52 fois la private sub
Je précise ma question : Es ce que je peux utiliser 52 fois la même macro mais à chaque fois que je change de feuilles le nom change pour la feuille courante...pour que les informations s'inscrive sur la page courante
J'espère que j'ai été assez claire ;-)
Merci Beaucoup d'avance Isa
Bonjour Isabelle,
Tu places ta macro dans un module standard, si ce n'est déjà fait et, tu enlèves "Sheets("1")." en début de chacune de
tes lignes de code... de cette manière, c'est la feuille active qui va recevoir les données à chaque fois que tu vas
faire intervenir cette macro.
'-----------------------
private sub exel(...)
Cells(nb, 3).Value = date_fermeture
Cells(nb, 4).Value = client
Cells(nb, 5).Value = num_client
Cells(nb, 6).Value = description
Cells(nb, 7).Value = montant
Cells(nb, 8).Value = premier
Cells(nb, 11).Value = rang
'.../...
End sub
'-----------------------
Salutations!
Salutations!
"Isabelle Chapados" <IsabelleChapados@discussions.microsoft.com> a écrit dans le message de news:
0F16A6D7-700A-4535-A0F9-4DDD23BACD24@microsoft.com...
Bonjour à tous,
j'ai une macro qui est relié avec une page
private sub exel(...)
Sheets("1").Cells(nb, 3).Value = date_fermeture
Sheets("1").Cells(nb, 4).Value = client
Sheets("1").Cells(nb, 5).Value = num_client
Sheets("1").Cells(nb, 6).Value = description
Sheets("1").Cells(nb, 7).Value = montant
Sheets("1").Cells(nb, 8).Value = premier
Sheets("1").Cells(nb, 11).Value = rang
...
Mon problème est que j'ai 52 feuilles et je voudrais savoir si il y a un
moyen de ne pas refaire 52 fois la private sub
Je précise ma question :
Es ce que je peux utiliser 52 fois la même macro mais à chaque fois que je
change de feuilles le nom change pour la feuille courante...pour que les
informations s'inscrive sur la page courante
Tu places ta macro dans un module standard, si ce n'est déjà fait et, tu enlèves "Sheets("1")." en début de chacune de tes lignes de code... de cette manière, c'est la feuille active qui va recevoir les données à chaque fois que tu vas faire intervenir cette macro.
'----------------------- private sub exel(...) Cells(nb, 3).Value = date_fermeture Cells(nb, 4).Value = client Cells(nb, 5).Value = num_client Cells(nb, 6).Value = description Cells(nb, 7).Value = montant Cells(nb, 8).Value = premier Cells(nb, 11).Value = rang '.../... End sub '-----------------------
Salutations!
Salutations!
"Isabelle Chapados" a écrit dans le message de news:
Bonjour à tous,
j'ai une macro qui est relié avec une page
private sub exel(...) Sheets("1").Cells(nb, 3).Value = date_fermeture Sheets("1").Cells(nb, 4).Value = client Sheets("1").Cells(nb, 5).Value = num_client Sheets("1").Cells(nb, 6).Value = description Sheets("1").Cells(nb, 7).Value = montant Sheets("1").Cells(nb, 8).Value = premier Sheets("1").Cells(nb, 11).Value = rang ... Mon problème est que j'ai 52 feuilles et je voudrais savoir si il y a un moyen de ne pas refaire 52 fois la private sub
Je précise ma question : Es ce que je peux utiliser 52 fois la même macro mais à chaque fois que je change de feuilles le nom change pour la feuille courante...pour que les informations s'inscrive sur la page courante
J'espère que j'ai été assez claire ;-)
Merci Beaucoup d'avance Isa
Isabelle Chapados
Merci infiniment... :-)
Bonjour à tous,
j'ai une macro qui est relié avec une page
private sub exel(...) Sheets("1").Cells(nb, 3).Value = date_fermeture Sheets("1").Cells(nb, 4).Value = client Sheets("1").Cells(nb, 5).Value = num_client Sheets("1").Cells(nb, 6).Value = description Sheets("1").Cells(nb, 7).Value = montant Sheets("1").Cells(nb, 8).Value = premier Sheets("1").Cells(nb, 11).Value = rang ... Mon problème est que j'ai 52 feuilles et je voudrais savoir si il y a un moyen de ne pas refaire 52 fois la private sub
Je précise ma question : Es ce que je peux utiliser 52 fois la même macro mais à chaque fois que je change de feuilles le nom change pour la feuille courante...pour que les informations s'inscrive sur la page courante
J'espère que j'ai été assez claire ;-)
Merci Beaucoup d'avance Isa
Merci infiniment... :-)
Bonjour à tous,
j'ai une macro qui est relié avec une page
private sub exel(...)
Sheets("1").Cells(nb, 3).Value = date_fermeture
Sheets("1").Cells(nb, 4).Value = client
Sheets("1").Cells(nb, 5).Value = num_client
Sheets("1").Cells(nb, 6).Value = description
Sheets("1").Cells(nb, 7).Value = montant
Sheets("1").Cells(nb, 8).Value = premier
Sheets("1").Cells(nb, 11).Value = rang
...
Mon problème est que j'ai 52 feuilles et je voudrais savoir si il y a un
moyen de ne pas refaire 52 fois la private sub
Je précise ma question :
Es ce que je peux utiliser 52 fois la même macro mais à chaque fois que je
change de feuilles le nom change pour la feuille courante...pour que les
informations s'inscrive sur la page courante
private sub exel(...) Sheets("1").Cells(nb, 3).Value = date_fermeture Sheets("1").Cells(nb, 4).Value = client Sheets("1").Cells(nb, 5).Value = num_client Sheets("1").Cells(nb, 6).Value = description Sheets("1").Cells(nb, 7).Value = montant Sheets("1").Cells(nb, 8).Value = premier Sheets("1").Cells(nb, 11).Value = rang ... Mon problème est que j'ai 52 feuilles et je voudrais savoir si il y a un moyen de ne pas refaire 52 fois la private sub
Je précise ma question : Es ce que je peux utiliser 52 fois la même macro mais à chaque fois que je change de feuilles le nom change pour la feuille courante...pour que les informations s'inscrive sur la page courante