Utilisation de Sheets().PrintOut Copies:=1

Bonjour,

J'utilise la fonction Sheets().PrintOut Copies:=1 avec un Array qui contient la liste des sheets à imprimer.

cela fonctionne excepté que cela m'imprime aussi la feuille sur laquelle je suis en train de travailler.

comment désactiver la feuille active et donc n'imprimer que les feuilles contenues dans mon array ?

merci d'avance,

Bonjour,


Difficile de répondre comme ça, tu pourrais nous montrer le code ?

Désolé, en gros mon code ressemble à ca...

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Private Sub Workbook_BeforePrint(Cancel As Boolean)   For p = 5 To p + iLines If Worksheets("CHECK PROCEDURE").Range("L" & p).Value = myPassportToPrint Then myArrayList(i) = Worksheets("CHECK PROCEDURE").Range("M" & p).Value i = i + 1 End If Next p   Application.EnableEvents = False Sheets(myArrayList).PrintOut Copies:=1 Application.EnableEvents = True end sub

---

En gros on a un tableau excel avec 3 feuilles.
On est en train de lire les données de la feuille 3 et on demande à imprimer la feuille 1 et 2, cela ajoute le nom des feuilles dans mon arrayList.

L'impression se lance mais cela imprime la feuille 3 (celle d'ou est partie la demande d'impression...) avec les autres, chose que je n'ai pas besoin.

Je ne sais pas donc comment je peux faire comprendre à la macro qu'il ne faut pas imprimer la feuille active, mais uniquement les autres.

J'ai modifié mon code :

Code:

---

1 2 3 4 5 6 7 8 9

Application.EnableEvents = False   Sheets(myArrayList).Select ActiveWindow.SelectedSheets.PrintOut Copies:=1   'Sheets(myArrayList).PrintOut Copies:=1   Application.EnableEvents = True

---

Ce qui en gros ne sélectionne que les feuilles que je choisi via mon interface et je n'ai plus la feuille active.

Par contre il me les imprime 2 fois....what else ?

Problème résolu,
il suffit d'enlever la ligne ActiveWindow.SelectedSheets.PrintOut Copies:=1

Comme je travaille dans une fonction BeforePrint, l'impression est déja lancée...

Alors ça c'st bien, tu répond tout seul à tes problèmes :lol: