imprimer 2 feuilles par code vba Résolu

Question

Bonjour

J'aimerais connaître le code pour imprimer automatiquement soit 1 feuille ou 2 feuilles de mon classeur si la dans la deuxiéme feuille la cellule "A63" est rempli.
MERCI POUR VOTRE AIDE
Linda

Papou93 · Answer

Bonjour Lindette,

voici un exemple :

- Dans la section 'Change' de la feuille 2 :

Private Sub Worksheet_Change(ByVal Target As Range)
  If Sheets(2).[a65] <> "" Then Imprimer
End Sub

- Dans un module de code :

Sub Imprimer()
  If Sheets(2).[a65] <> "" Then
    Sheets(Array("Feuil1", "Feuil2")).Select
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
  End If
End Sub

Cordialement.

Imprimer 2 feuilles par code vba

1 réponse

Discussions similaires

Newsletters