Macro VBA. Impression de plusieurs feuilles d'un classeur en fonction d'une autre feuille

Christine15

XLDnaute Nouveau
Bonjour,

J'espère que vous allez bien. Je me présente je m'appelle Christine et je travaille au sein d'un service QSE.


Dans un fichier Excel je cherche à effectuer plusieurs impressions automatique d'une feuille, en fonction du nombre de lignes remplies d'un tableau d'une autre feuille du même classeur, avec un bouton d'impression (que j'ai déjà créé sur la feuille 'Nom participant".

Je vous joint le fichier pour comprendre plus facilement.

C'est à dire que je souhaiterais qu'il y ait autant d'impression de la feuille "Appréciation de formation" que de personne participant à la formation dans la feuille "Nom participant".

Pourriez-vous m'aider svp ?

Je vous remercie.

Bonne journée à vous
 

Pièces jointes

  • Support de formation test.xlsm
    497.3 KB · Affichages: 4
Solution
Bonjour,

Le nombre de participant étant en A16 de la feuille "Nom participant" :
Sans sélection ni activation de la feuille
VB:
Sub ImpressionAppréciation()
' Travailler à partir de ce classeur, sans activation de la feuille
    With ThisWorkbook
        .Sheets("Appréciation de formation").PrintOut _
                Copies:=.Sheets("Nom participant").Range("A16"), _
                Collate:=True, _
                IgnorePrintAreas:=False
    End With
End Sub
Ce modèle, avec la structure With...EndWith, s'assure qu'on travaille bien à partir du classeur qui contient la macro (ThisWorkbook) et que ce sont de ses feuilles qu'il s'agit.
On ne sait jamais à partir de quel classeur sera lancée une macro.
Si vous travaillez sur plusieurs...

Hasco

XLDnaute Barbatruc
Repose en paix
Bonjour @Phil69970 et @Hasco !!

Excusez moi je ne savais pas je suis nouvelle sur le groupe !!!!!

Je vais modifier ça si c'est possible !!! pas de panique
Non pas de panique @Christine15,
La course aux bons points... j'adore :)
c'était du second degré, ce qui me connaissent l'avaient certainement compris.

Je suis contre ce genre de "bon points" et si vous voulez vous l'accorder, je trouverai ça préférable, car vous avez fait l'effort d'apprendre quelque chose.

Personnellement je n'en ai pas besoin, je sais ce que je suis, ce que je vaux (ou pas) et n'ai nullement besoin qu'on m' attribue des "bons points" ni d'être applaudit.

C'est pourquoi, ici je peux être si détestable.
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
313 271
Messages
2 096 727
Membres
106 734
dernier inscrit
Alain EDZOA