XL 2016 Imprimer dans un ordre donné des feuilles d'un classeur

TooFatBoy

XLDnaute Barbatruc

• 6 Janvier 2022

• #31

Phil69970 à dit:

je trouve cela assez sympa
Je réfléchis sur la V3 encore plus simple.....

Cliquez pour agrandir...

Oui, j'ai vu pour la v2 et c'est vrai que c'est plutôt sympa comme truc.

Mais ne t'embête pas avec une v3 car je vois déjà à peu près comment je vais procéder pour mon classeur. Merci.

 

Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc

• 6 Janvier 2022

• #32

Re
Voila la V3
Trop tard déjà fait

@Phil69970

 

Pièces jointes

• Ordre impression V3.xlsm

  32.1 KB · Affichages: 7

Vote positif 0 Vote négatif

TooFatBoy

XLDnaute Barbatruc

• 6 Janvier 2022

• #33

kiki29 à dit:

Salut, à titre d'info : PDFCreator 1.7.3 Modifier l'ordre dans la queue d'impression puis fusionner le tout en un seul PDF

Cliquez pour agrandir...

Merci pour ta réponse.

Avant de poser ma question ici j'avais fait des recherches sur le net et j'étais tombé sur ce fil de discussion mais, préférant ne pas ajouter de logiciel tiers, et étant de plus persuadé qu'il n'y avait pas de version gratuite de PDFcreator, je n'avais pas lu ledit fil...

Pour l'instant je préfère la solution du déplacement des onglets, puisqu'elle fonctionne pour la création d'un pdf mais aussi pour une impression sur papier, et qu'elle est simple et rapide.
Mais je garde ta proposition sous le coude, ça peut toujours servir. Merci

 

Vote positif 0 Vote négatif

TooFatBoy

XLDnaute Barbatruc

• 6 Janvier 2022

• #34

Phil69970 à dit:

Voila la V3
Trop tard déjà fait

Cliquez pour agrandir...

Dans ce cas, suis obligé de regarder ce que tu nous as créé.

Je regarde et je te dis quoi.

 

Vote positif 0 Vote négatif

TooFatBoy

XLDnaute Barbatruc

• 6 Janvier 2022

• #35

Perso, je ne vais pas passer par une feuille pour mémoriser l'ordre des pages, mais vais utiliser un array.
Et pareil pour l'ordre des onglets à imprimer, qui sera probablement choisi dans un UserForm et mémorisé dans un array.

Mais il est vrai que ton classeur est plus souple pour l'utilisateur.

 

Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc

• 6 Janvier 2022

• #36

Re

Libre à toi de le modifier comme tu le souhaites mais c'était pour moi le plus simple comme tu dis pour un utilisateur lambda...

Marcel32 à dit:

Mais il est vrai que ton classeur est plus souple pour l'utilisateur.

Cliquez pour agrandir...

On peut mème améliorer en faisant référence au codeName de la la feuille plutôt qu'au Name

Arr = Sheets(Array(Feuil1.CodeName, Feuil2.CodeName, Feuil3.CodeName, Feuil4.CodeName)).PrintPreview

Cliquez pour agrandir...

@Phil69970

 

Vote positif 0 Vote négatif

Eric C

XLDnaute Barbatruc

• 6 Janvier 2022

• #37

Bonjour le fil

@Phil : Tu dis : Pour ma part passer par un gestionnaire comme sur la photo permet de ne pas lancer l'impression mais de la stopper dans le dit gestionnaire ..... super pratique pour simuler l'impression..

Cliquez pour agrandir...

Pourrais tu m'en dire plus et surtout comment tu procèdes en détail, cela m'éviteras, quand nécessaire, de poursuivre en commettant des erreurs car avec PrintPreview ça semblait fonctionner.
@Marcel : Quand ton projet sera abouti (USF avec choix), merci de le partager.

Bonne journée à toutes & à tous
@+ Eric c

 

Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc

• 6 Janvier 2022

• #38

Re

@Eric C
Avec mon imprimante Samsung C460W j'ai installé un des logiciels qui est fourni avec et que j'ai trouvé sympa.
Est il adaptable à toutes les imprimantes ? Je ne sais pas.
Sur internet il doit bien y avoir des logiciels similaires qui correspond à ton imprimante.

@Phil69970

 

Vote positif 0 Vote négatif

Eric C

XLDnaute Barbatruc

• 6 Janvier 2022

• #39

Re le fil

@ Phil : Je persiste avec mon fichier car je ne comprends pas ce qui ne va pas... J'ai remplacé la prévision des onglets par leur copie en fin de classeur et cela fonctionne. Peux tu y regarder. merci à toi.

@Marcel - Ce que tu désires c'est copier le contenu de tes 2 feuilles (qui ne sont donc pas remplies) sur une seule ? Car dès le début, j'ai compris que tu voulais désigner les onglets puis les imprimer dans cet ordre.
@+ Eric c

 

Pièces jointes

• impression sans ordre précis.xlsm

  26.7 KB · Affichages: 7

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 6 Janvier 2022

• #40

Bonjour à tous,

Il y a une chose que je ne comprends pas, vous voulez bien une feuille A4 pour chaque onglet listé ?

Alors faites simplement une boucle sur la liste classée dans l'ordre que vous voulez :

VB:

Private Sub CommandButton1_Click()
Dim w As Worksheet
For Each w In Sheets(Array("Feuil2", "Feuil3", "Feuil4", "Feuil1")) 'liste dans l'ordre désiré
    w.PrintPreview
    'w.PrintOut
Next
End Sub

Bien sûr il faut fermer l'aperçu pour chaque feuille et alors ?

A+

 

Vote positif 0 Vote négatif

Eric C

XLDnaute Barbatruc

• 6 Janvier 2022

• #41

Re le fil
Bonsoir job75 - Pourriez-vous jeter un coup d'œil au fichier joint au post #20. Il me semble qu'il soit à quelques virgules près, sensiblement identique au vôtre.
@+ Eric c

 

Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc

• 6 Janvier 2022

• #42

Re

@Eric C :

Ton fichier du post #20 (à la remarque 1 de mon post # 21) correspond pratiquement au code de Job mais celui du post #39 ne fonctionne pas du tout

Le 2 codes reviennent à :

Marcel32 à dit:

Imprimer les onglets les uns après les autres, dans un ordre ou un autre, c'est ce que je fais déjà dans mon programme.

Cliquez pour agrandir...

Et Marcel à je crois répondu à la question

@Phil69970

 

Vote positif 0 Vote négatif

Eric C

XLDnaute Barbatruc

• 6 Janvier 2022

• #43

Re

@Phil : Voici ce que j'obtiens avec le fichier (#39) - Je pensais avoir compris la demande de Marcel32 dès le début (Post #20) mais après je me suis dis qu'il voulais peut être condensé les données de 2 feuilles pour les retranscrire sur une ??
@+ Eric c

 

Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc

• 6 Janvier 2022

• #44

Re

Oui la copie des 4 onglets fonctionnent mais il n'y a pas d'impression.
Eric le plus simple est d'attendre le retour de Marcel qui nos expliquera ce qu'il en pense.

@Phil69970

 

Vote positif 0 Vote négatif

Y

yal

XLDnaute Occasionnel

• 6 Janvier 2022

• #45

Bonsoir
Si excel imprime les feuilles dans un ordre déterminé et immuable pourquoi ne pas créer un classeur tampon et y copier les feuilles dans l'ordre souhaité. Puis imprimer à partir de ce classeur temporaire et le détruire à la fin.

 

Vote positif 0 Vote négatif