Imprimer une feuille seulement si active (résolu)

[Cougar]

Bonjour le forum,

J'utilise la Sub BeforePrint. Cependant je veux que le code soit activé seulement si la Feuille GTS est active. Si une autre feuille du classeur est activée, la feuille GTS ne sera pas imprimée.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If Worksheets("GTS").Activate Then ' ne fonctionne pas ???
.....
else
End If
End Sub

Merci de votre aide

 

[Robert]

Bonjour Cougar, bonjour le forum,

Peut-être :

If ActiveSheet.Name = "GTS" Then

 

[Cougar]

Bonjour Robert, le forum,

Ça fonctionne.

Merci