Macro excel pour une impression selective

Question

Bonjour, 

J'ai un fichier excel avec plusieurs onglets (plusieurs page de calcul dans le même fichier)
Dans mon usage, je n'utilise pas nécessairement tous les onglets.

J'aimerais avoir une commande macro qui permettrait de demander d'imprimer uniquement les onglets qui sont utilisés.
Soit par la validation d'une cellule plus grande que zero.
Je pourrais aussi créer une cellule a cocher sur chacun des onglets pour définir ''à imprimer''

Aidez moi svp

cs_Le Pivert · Answer

Bonjour,

voir ceci:

 https://silkyroad.developpez.com/VBA/FeuilleDeCalcul/

https://docs.microsoft.com/fr-fr/office/vba/api/excel.sheets.printout

ce qui donne:

Option Explicit
'https://silkyroad.developpez.com/VBA/FeuilleDeCalcul/
'https://docs.microsoft.com/fr-fr/office/vba/api/excel.sheets.printout
Sub boucle()
'Déclare la variable objet
Dim Ws As Object
'Boucle sur tous les onglets du classeur
'ThisWorkbook correspond à l'objet classeur contenant la macro
For Each Ws In ThisWorkbook.Sheets
    'Renvoie le nom de chaque onglet
   If Ws.Range("A1").Value > 1 Then
      ActiveSheet.PrintOut
    End If
Next Ws
End Sub


a mettre dans un module

Macro excel pour une impression selective

1 réponse

Votre réponse

Discussions similaires

Newsletters