Une macro pour imprimer uniquement les feuilles visibles dans un classeur

Si vous avez un classeur avec un nombre considérable de feuilles de calcul, certains visibles et d'autres cachés, et que vous voulez imprimer uniquement les feuilles visibles, alors vous pouvez utiliser cette macro.

1. Dans le classeur souhaité, faites Alt + F11 pour atteindre l'éditeur Visual Basic

2. cliquez sur Insertion, Module

 3. Ceci ouvrira la fenêtre de code

4. entrez le code de la macro suivant :

Sub PrintVisibleSheets()

‘***************************************************
‘Imprimer les feuilles visibles *
‘***************************************************
Dim wSheet As Worksheet
For Each wSheet In ActiveWorkbook.Worksheets
If wSheet.Visible Then wSheet.PrintOut
Next
End Sub

5. Dans le menu Fichier cliquez sur Fermer et retourner à Microsoft Excel.
8. Votre nouvelle macro est maintenant prêt à être exécuté.

Pour exécuter votre macro:

1. Dans le menu Outils sélectionnez Macros. Une liste des macros disponibles seront affichées.

2. Sélectionnez votre macro et cliquez sur Exécuter