Impressions multiples
Résolu
gigipong
Messages postés
118
Date d'inscription
Statut
Membre
Dernière intervention
-
gigipong Messages postés 118 Date d'inscription Statut Membre Dernière intervention -
gigipong Messages postés 118 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Sur l'exemple joint, j'ai en feuille 1 une liste nominative (réduite exprès pour l'exemple).
En feuille 2, je voudrais imprimer tous les noms de la liste page par page automatiquement en faisant changer le numéro qui apparaît en case B5.
Comme il y a 7 lignes, je devais avoir 7 pages différentes.
https://www.cjoint.com/c/KLxkVfzEmqC
J'espère m'avoir fait comprendre et je souhaite que quelqu'un puisse m'aider.
Cordialement.
Sur l'exemple joint, j'ai en feuille 1 une liste nominative (réduite exprès pour l'exemple).
En feuille 2, je voudrais imprimer tous les noms de la liste page par page automatiquement en faisant changer le numéro qui apparaît en case B5.
Comme il y a 7 lignes, je devais avoir 7 pages différentes.
https://www.cjoint.com/c/KLxkVfzEmqC
J'espère m'avoir fait comprendre et je souhaite que quelqu'un puisse m'aider.
Cordialement.
A voir également:
- Impressions multiples
- Prestashop déclinaisons multiples ✓ - Forum Webmastering
- Prestashop : Produits phares non visibles - Forum Webmastering
- Prestashop ne veut pas marcher ✓ - Forum Créer un site
- Technique de paris multis (ou multiples) ✓ - Forum Loisirs / Divertissements
- Historique des impressions - Forum MacOS
5 réponses
Bonjour
La macro doit être placée dans un module de l'éditeur VBA
Ensuite depuis la page à imprimer lancer la macro (Onglet Developpeur - Macro -. ..)
Il est alors demandé à l'utilisateur le n° de la dernière feuille à imprimer, si tu réponds par exemple 5, la valeur de la cellule C2 doit varier de 1 à 5, les données doivent changer en fonction des formules dans ta feuille et chaque fois la feuille est imprimée, tu auras donc dans cet exemples 5 feuilles imprimées
La macro doit être placée dans un module de l'éditeur VBA
Ensuite depuis la page à imprimer lancer la macro (Onglet Developpeur - Macro -. ..)
Il est alors demandé à l'utilisateur le n° de la dernière feuille à imprimer, si tu réponds par exemple 5, la valeur de la cellule C2 doit varier de 1 à 5, les données doivent changer en fonction des formules dans ta feuille et chaque fois la feuille est imprimée, tu auras donc dans cet exemples 5 feuilles imprimées
Bonjour
Avec une macro :
https://www.cjoint.com/c/KLxo3ET080g
Depuis la feuille 2 lancer la macro avec le raccourci clavier Ctrl + i
Pour l'instant pour test la macro n'imprime pas mais lance un aperçu avant impression pour test
Pour modifier la macro pour imprimer ouvrir l'éditeur VBA (Alt + F11) - aller dans Module 1 et suivre les indications données dans les commentaires
Cdlmnt
Via
Avec une macro :
https://www.cjoint.com/c/KLxo3ET080g
Depuis la feuille 2 lancer la macro avec le raccourci clavier Ctrl + i
Pour l'instant pour test la macro n'imprime pas mais lance un aperçu avant impression pour test
Pour modifier la macro pour imprimer ouvrir l'éditeur VBA (Alt + F11) - aller dans Module 1 et suivre les indications données dans les commentaires
Cdlmnt
Via
Bonjour et merci pour la réponse.
C'est presque ce que je voulais.
Explication : en simplifiant mon exemple, je sous-entendais plusieurs cellules formant une page complète (en réalité de A1 à E28 et la cellule à incrémenter est C2).
Je suis désolé si j'ai raccourci mes explications, je pensais pouvoir utiliser ce que je recevrais et l'adapter.
Autre point, il faudrait que les impressions se fassent toutes sans intervention selon un nombre défini en commençant à 1 bien sûr et terminant à … nombre à définir.
Mais en tout cas, ce que j'ai reçu fonctionne très bien.
Cordialement
C'est presque ce que je voulais.
Explication : en simplifiant mon exemple, je sous-entendais plusieurs cellules formant une page complète (en réalité de A1 à E28 et la cellule à incrémenter est C2).
Je suis désolé si j'ai raccourci mes explications, je pensais pouvoir utiliser ce que je recevrais et l'adapter.
Autre point, il faudrait que les impressions se fassent toutes sans intervention selon un nombre défini en commençant à 1 bien sûr et terminant à … nombre à définir.
Mais en tout cas, ce que j'ai reçu fonctionne très bien.
Cordialement
Pour avoir une aide efficace il faut fournir un exemple réel de ton fichier (avec des noms bidons si nécessaire) et de sa structure et on verra pour une macro adéquate
Les pages que je veux imprimer rassemblent des informations récupérées avec la fonction "recherche" depuis plusieurs onglets, et chaque onglet contient beaucoup d'informations.
La liste concernée dépasse les 130 entrées (d'où 130 tirages à incrémenter).
C'est très difficile de faire un fichier qui ressemblerait mais sans les données réelles.
Si mes explications sont insuffisantes, je m'orienterai vers un travail au coup par coup.
Et je ne remercierai jamais assez les gens qui peuvent m'aider.
La liste concernée dépasse les 130 entrées (d'où 130 tirages à incrémenter).
C'est très difficile de faire un fichier qui ressemblerait mais sans les données réelles.
Si mes explications sont insuffisantes, je m'orienterai vers un travail au coup par coup.
Et je ne remercierai jamais assez les gens qui peuvent m'aider.
Ce que je ne comprend pas c'est si tu as 130 pages déjà remplies avec ta fonction RECHERCHE et que tu veux imprimer ces 130 pages ou si tu as une seule page dans laquelle en fonction du n° en C2 qui change les infos (par des formules RECHERCHE ?) changent aussi et que tu veux imprimer cette page 130 fois selon les 130 changements ou si c'est encore autre chose ?
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Re,
Dans ce cas là c'est même plus simple, il suffit de demander à l'utilisateur le dernier n° à imprimer, de faire varier C2 de 1 à ce dernier n° en imprimant à chaque fois :
Dans ce cas là c'est même plus simple, il suffit de demander à l'utilisateur le dernier n° à imprimer, de faire varier C2 de 1 à ce dernier n° en imprimant à chaque fois :
Sub imprime()
nl = InputBox("Indiquer le dernier n° à imprimer")
For n = 1 To nl
ActiveSheet.Range("C2") = n
ActiveSheet.PrintOut
Next
End Sub
Bonjour,
J'essaie de comprendre et d'assimiler toutes les solutions proposées pour m'aider dans mes demandes.
Mais je reconnais être limité.
C'est pourquoi j'ai placé la macro dans mon fichier mais je n'arrive pas à imprimer plus que la feuille avec 1 en C2.
Je souhaite avoir encore un peu d'aide pour savoir comment utiliser cette macro.
Cordialement.
J'essaie de comprendre et d'assimiler toutes les solutions proposées pour m'aider dans mes demandes.
Mais je reconnais être limité.
C'est pourquoi j'ai placé la macro dans mon fichier mais je n'arrive pas à imprimer plus que la feuille avec 1 en C2.
Je souhaite avoir encore un peu d'aide pour savoir comment utiliser cette macro.
Cordialement.
C'est excellent, je viens de tester et je te remercie pour les explications.
ça fonctionne très bien.
Très cordialement.