Certaines tâches répétitives gagnent à être automatisées. Il en est ainsi des impressions. Il est en effet fréquent d’avoir à imprimer de manière récurrente des feuilles de travail. Sur des séries importantes, cette tâche se révèle rapidement fastidieuse. Or elle est aisément automatisable à l’aide de quelques lignes de code VBA.

L’instruction VBA qui permet à Excel d’imprimer est .PrintOut, elle s’utilise ainsi :

ActiveWorkbook.Sheets(1).PrintOut

Dans cet exemple, Excel va imprimer la première feuille (la plus à gauche) du classeur en cours.

Paramètres de l’instruction .PrintOut :

Source : https://msdn.microsoft.com/fr-fr/library/office/ff838253.aspx

A titre d’illustration, voici un programme qui n’imprime que les feuilles de calcul du classeur en cours qui répondent à un critère déterminé. Petit raffinement complémentaire, ce programme change la couleur des onglets imprimés pour les identifier visuellement.

Sub Traite_OngletsNonVides()
    Dim i As Integer
    Const CelluleATester = "F28"

    With ActiveWorkbook
        For i = 1 To .Sheets.Count - 1
            With .Sheets(i)
                If .Range(CelluleATester).Value <> 0 Then
                    With .Tab
                        .Color = 5296274
                        .TintAndShade = 0
                    End With
                    .PrintOut Copies:=2
                Else:
                    With .Tab
                        .ThemeColor = xlThemeColorAccent6
                        .TintAndShade = 0.799981688894314
                    End With
                End If
            End With
        Next i
    End With
End Sub

Pour résumer, le programme passe en revue toutes les feuilles de calcul du classeur en cours (ActiveWorkbook) à l’aide de la boucle compteur For… To… Next (sauf la dernière, d’où le -1) : si le contenu de la cellule F28 (constante CelluleATester) est différent de 0 (zéro), l’onglet est coloré en vert et la feuille est imprimée (.PrintOut) en deux exemplaires (Copie:=2). Ceci fait, le programme passe à la feuille suivante (Next).

Il ne reste plus qu’à sauvegarder le classeur et à affecter la macro à un bouton de commande.

Approfondir le sujet : Programmer en VBA / Initiation au langage Basic / Créez votre premier programme VBA avec l’enregistreur de macros

The following two tabs change content below.

• Bio
• Derniers articles

Benoît RIVIERE

Après seize années passées en cabinet d’expertise-comptable et de commissariat aux comptes (où j’ai exercé comme expert-comptable et chef de mission audit), j’ai pris le poste de directeur comptable d’un groupe de distribution automobile en novembre 2014. Au cours de ma carrière, j’ai acquis une expérience significative en audit et en exploitation des systèmes d’information (analyse de données, automatisation des tâches, programmation informatique) au service de la production des comptes annuels et consolidés. C’est cette expérience personnelle et ma passion pour l’informatique que je partage sur ce blog. Mon CV / Réalisations personnelles et projets informatiques / Ma collection / Me contacter

Derniers articles parBenoît RIVIERE (voir tous)

• Analyse des données comptables (FEC) : analyse de la conformité comptable des transactions et de leur dénouement - dimanche 23 novembre 2025
• L’AMF et l’AFA appellent à la vigilance sur le risque de corruption par des réseaux criminels de personnes ayant accès à des informations privilégiées - lundi 4 août 2025
• Détecter les inversions HT/TVA avec ANA-FEC2 - jeudi 31 juillet 2025
• Analyse de FEC en ligne avec ANA-FEC2 (manuel d’utilisation) - mardi 29 juillet 2025
• Rapport AFA 2024 : les contrôles comptables à ne pas négliger - samedi 5 juillet 2025