Comment imprimer toutes les feuilles d’un classeur Excel, à l’exception d’une feuille spécifique ?
Lorsque vous travaillez dans Excel, imprimer plusieurs feuilles est une tâche courante. Mais comment faire si vous devez imprimer toutes les feuilles d’un classeur, sauf une ? Par exemple, vous souhaitez peut-être imprimer l’ensemble des feuilles, à l’exception de celle intitulée « Total ». Dans ce guide, nous vous proposons deux méthodes simples pour exclure rapidement une feuille de votre impression.
Imprimer toutes les feuilles sauf une avec VBA
Imprimez uniquement les pages dont vous avez besoin avec Kutools pour Excel
Imprimer toutes les feuilles sauf une avec VBA
Voici un code VBA qui permet d’imprimer toutes les feuilles, à l’exception d’une feuille spécifique.
1. Activez le classeur à partir duquel vous souhaitez imprimer les feuilles, puis appuyez sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez sur Insertion > Module, puis collez le code ci-dessous dans le script du module.
VBA : Imprimer les feuilles sauf une
Sub printsheets()
'UpdatebyExtendoffice20161031
Dim xWs As Worksheet
Application.ScreenUpdating = False
For Each xWs In ThisWorkbook.Worksheets
If xWs.Visible = True Then
If xWs.Name <> "Total" Then
With xWs.PageSetup
.PrintArea = "A1:B15" ' USE YOUR PRINTAREA
.Zoom = False
.FitToPagesTall = 1
.FitToPagesWide = 1
End With
xWs.PrintOut
End If
End If
Next xWs
Application.ScreenUpdating = False
MsgBox "Sheet “Total” has not been printed", vbInformation, "Kutools for Excel"
End Sub
Remarque : Dans le code, le nom Total présent dans If xWs.Name «Total» Then et dans MsgBox «La feuille Total n’a pas été imprimée» correspond au nom de la feuille que vous ne souhaitez pas imprimer, et A1:B15 dans .PrintArea = "A1:B15" représente la plage à imprimer sur chaque feuille. Vous pouvez les modifier selon vos besoins.
3. Appuyez sur la touche F5 pour exécuter le code. Une boîte de dialogue s’affiche alors afin de vous rappeler que la feuille spécifique n’a pas été imprimée. Voir la capture d’écran :
4. Cliquez sur OK pour fermer la boîte de dialogue.
Imprimez uniquement les pages dont vous avez besoin avec Kutools pour Excel
Si vous souhaitez imprimer uniquement les pages paires, impaires ou encore des pages spécifiques d’une feuille, utilisez l’utilitaire Kutools pour Excel’s Imprimer des pages spécifiées : une solution rapide et efficace au bout des doigts !
1. Activez la feuille dans laquelle vous souhaitez imprimer certaines pages, puis cliquez sur KUTOOLS PLUS > Impression > Imprimer des pages spécifiées. Voir la capture d’écran :
2. Ensuite, dans la boîte de dialogue Imprimer des pages spécifiées, cochez les options correspondant à vos besoins d’impression. Voir la capture d’écran :
3. Cliquez sur Imprimer pour lancer l’impression des pages.
Kutools pour Excel– Boostez Excel avec plus de 300 outils essentiels, pour gagner en rapidité et en simplicité, et profitez des fonctionnalités d’intelligence artificielle pour un traitement de données plus intelligent et une productivité accrue.Obtenez-le dès maintenant
Meilleurs outils de productivité Office
Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et rend votre travail bien plus facile
- Activez l’édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50 % et vous fait économiser des centaines de clics de souris chaque jour !
Tous les compléments Kutools. Un seul installateur
Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.
- Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
- Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
- Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
- Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
- Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels