Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Impression avec cellule personnalisé

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion degards
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
D

degards

XLDnaute Occasionnel
Bonjour à vous !!!

J'Aimerais savoir s'il est possible de faire imprimer plusieurs feuilles dans excel mais avec un nom différent dans l'en-tête un peu comme le publipostage dans Word. LA raison est que dans le cadre de mon travail nous avons tous une feuille de travail de la journée, qui est la même pour tous, mais lorsque je l'imprime j'aimerais que le nom des gens qui travaillent cette journée là soit inscrit dans une cellule en particulier.

Merci !!!!
 
Trier par date Trier par votes
Re : Impression avec cellule personnalisé

Bonjour

Si tu as une feuille par personne, il suffit dans l'en-tête d'utiliser le champ Nom onglet.

Pour imprimer toutes les feuilles en même temps, les sélectionner puis imprimer
 
Vote positif 0 Vote négatif
Re : Impression avec cellule personnalisé

Bonjour gilbert_RGI !!!

Merci pour l'exemple de votre macro ça ressemble drôlement à ce que je recherche. Jevous ai joins le fichier que je travaille dessus pour que vous puissiez m'aider d'avantage si cela ne vous dérange pas. Dans l'onglet 518 vous trouverez des cellules avec des couleurs. Ce que j'aimerais c'est qu'en appuyant sur un bouton imprimer(macro comme vous l'avez fait), une impression s'exécute automatiquement avec, dans la cellule jaune, chaque nom(cellule verte) et numéro(cellule bleue) et bien sur en nombre de copie équivalent au nombre de nom (cellule verte). Par exemple : la première impression on verra dans la cellule jaune "Lessard 9166", dans la seconde page d'impression "Gosselin 11283", troisième impression "Lafontain 11743" et ainsi de suite. Il est à noter que l'onglet "518" s'imprimer recto/verso.

Merci beaucoup à l'avance

Benoit
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Impression avec cellule personnalisé

Bonjour à nouveau Gilbert_RGI !!

J'aimerais savoir s'il est possible dans votre macro d'impression, que vous avez conçu, d'inclure une ligne qui ferais en sorte que lorsque la cellule est vide (par exemple : L24) la macro passe à la cellule suivante, sans imprimer biensûr, et vérifie si la cellule L26 (toujours selon mon exemple) contient un matricule et imprime si oui ou passe à la suivant si vide et ainsi de suite. Je vous joins à nouveau le fichier qui à été modifié depuis le temps.

Merci !!!

Degards

 

Pièces jointes

Vote positif 0 Vote négatif
Re : Impression avec cellule personnalisé

Bonjour

a tester en remplacant le code existant par celui ci-dessous

Code: 
Sub imprime()
    For i = 9 To Sheets(1).Range("L33").End(xlUp).Row Step 2
    If IsError(Sheets(1).Cells(i, 12).Value) Then GoTo pass
    If Sheets(1).Cells(i, 12).Value = " " Then GoTo suite
        Sheets(1).Cells(2, 13) = Sheets(1).Cells(i, 12) & " " & Sheets(1).Cells(i, 12).Offset(-1, 0)
        imprim 'enlever l apostrophe devant imprim et mettre les propriétés imprimante en recto / verso
        'MsgBox "imprime " & Sheets(1).Cells(2, 13)
pass:
    Next
suite:
    Sheets(1).Cells(2, 13) = ""
End Sub
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Impression avec cellule personnalisé

Malheureusement ça ne fonctionne pas correctement car cela imprime une feuille pour chaque cellule de L8 à L32 et ce qu'il y ait un matricule d'inscrit ou non. Ce que je voulais c'est qu'il n'y ait pas d'impression lors la cellule de la colonne L n'a rien d'inscrit. Je ne veux pas vous importuné avec mes demandes mais cela m'aiderait beaucoup.
 
Vote positif 0 Vote négatif
Re : Impression avec cellule personnalisé


bizzare car chez moi et suivant le code si la cellule testée est differente de rien ou si elle n'est pas en erreur alors la commande d'impression est déclenchée
 
Vote positif 0 Vote négatif
Re : Impression avec cellule personnalisé

Je ne veux pas vous contrarier bien sûr mais de mon côté même si j'inscris rien dans la colonne L, 13 feuille s'imprime automatiquement. Je regardais votre code et je me demandais si dans la macro suivante :
Sub imprim()
On Error GoTo vide
Feuil1.PrintOut
Exit Sub
vide:
MsgBox "il n'y a rien à imprimer"
End Sub[/I]

Le mot vide devrait peut-être inscrit en anglais. JE vous joins une image d'écran avec la version de mon Excel, ça va peut-être vous aider.
 

Pièces jointes

  • Sans titre.jpg
    100.1 KB · Affichages: 92
  • Sans titre.jpg
    100.1 KB · Affichages: 93
Vote positif 0 Vote négatif
Re : Impression avec cellule personnalisé

ok vous avez la version 2003 mais la macro devrait fonctionner comme chez moi

vide est une etiquette alors qu'elle soit en anglais ou en français peu importe pourvu que ce ne soit pas un mot reservé
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Impression avec cellule personnalisé

Finalement M Gilbert j'ai trouvé la solution.

If IsError(Sheets(1).Cells(i, 12).Value) Then GoTo pass
If Sheets(1).Cells(i, 12).Value = "" Then GoTo pass
J'ai modifié le mot I]suite[/I] par le mot pass inscrit en rouge.

Autrement tout s'arrêtait lorsque la macro rencontrait une cellule vide. Merci encore pour votre coup de main.

Degards

gilbert_RGI à dit:
ok vous avez la version 2003 mais la macro devrait fonctionner comme chez moi

vide est une etiquette alors qu'elle soit en anglais ou en français peu importe pourvu que ce ne soit pas un mot reservé
Cliquez pour agrandir...
 
Vote positif 0 Vote négatif
Re : Impression avec cellule personnalisé

Je n'ai aucune erreur #N/A dans ma feuille de calcul moi. L'important est que ça marche. En passant cette macro est accessible par un clic droit sur n'importe quel cellule. Peut-on modifier le nom de cette dans là dans le menu qui apparait avec le clic droit.
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
XL 2016 ajouter, une nouvelle feuille avec le contenu d'une cellule
Réponses
7
Affichages
352
job75
M
  • Résolu(e)
Microsoft 365 Impression Userform en format paysage + Envoyer l'imprime écran du Userform par courriel
2
Réponses
17
Affichages
1 K
patricktoulon
B
  • Question Question
XL 2013 excel Copier coller feuille avec tout le contenue
Réponses
4
Affichages
309
Bodin44
B
A
  • Résolu(e)
Microsoft 365 Enregistrer copie d'un fichier avec pour nom le contenu d'une cellule excel (macro)
2
Réponses
15
Affichages
1 K
firecarl
F
P
  • Question Question
XL 2016 Automatiser une formule RECHERCHEV avec un nom de fichier différent en fonction du résultat d'une cellule
Réponses
10
Affichages
1 K
Phil69970
E
  • Résolu(e)
Microsoft 365 Ajouter dans TS en fonction valeur de cellule
Réponses
8
Affichages
579
vgendron
D
  • Question Question
XL 2016 Utiliser un équivalent de INDIRECT sur des classeurs fermés
Réponses
8
Affichages
954
job75
C
  • Résolu(e)
XL 2021 Remplacer ThisWorkbook.Path par une cellule précise
Réponses
6
Affichages
623
cgpa
C
C
  • Question Question
XL 2019 Fonction personnalisé avec boucle à simplifier
Réponses
5
Affichages
505
carlos
C
A
  • Question Question
Microsoft 365 Macro pour recherche de cellules entre 2 fichiers Excel
Réponses
7
Affichages
533
AtTheOne
Z
  • Question Question
Microsoft 365 Rendre visible un onglet en fonction du contenu d'une cellule
Réponses
2
Affichages
287
zorol
Z
  • Résolu(e)
XL 2021 Extraction images depuis commentaire de cellule vers dossier.
11 12 13
Réponses
182
Affichages
4 K
patricktoulon
  • Question Question
XL 2010 mon problème c'est : qu'une cellule avec une fonction = cellule non vide
Réponses
3
Affichages
1 K
Lynattendu
  • Résolu(e)
XL 2016 Suivi location de voiture
Réponses
4
Affichages
2 K
Armisa
Y
  • Question Question
Microsoft 365 Publipostage automatique de plusieurs fichiers word à partir d'excel
Réponses
6
Affichages
1 K
yannlion
Y
M
  • Question Question
XL 2021 Mise en Forme Conditionnelle avec Formule Complexe
Réponses
4
Affichages
692
sylvanu
C
  • Question Question
Autres Dans Excel, à partir d'un UserForm, copier l'adresse sélectionnée dans enveloppe de publipostage Word et ouvrir la fenêtre "aperçu avant impression"
Réponses
11
Affichages
944
Chatron
C
G
  • Résolu(e)
XL 2013 Concaténer cellule avec en tête de colonnes pour publipostage
Réponses
7
Affichages
823
Staple1600
L
  • Résolu(e)
Microsoft 365 Création d'un code VBA pour sélectionner des zone selon choix multiples.
Réponses
3
Affichages
634
Lionel Alfred
L
M
  • Résolu(e)
XL 2019 [Résolu] VBA test sur une cellule en format [hh]:mm
Réponses
4
Affichages
767
miloo
M
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…