Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Imprission de certaine feuille

ChTi160

XLDnaute Barbatruc
Salut Vinvinsylvain

je pense qu'une procèdure de ce genre doit permettre l'impression des feuilles qui commence par LP

Code:
Sub print_LP()
Dim Ws As Worksheet
For Each Ws In Worksheets
If Left(Ws.Name, 2) = 'LP' Then
 Ws.PrintOut
 End If
 Next
End Sub

Message édité par: Chti160, à: 28/09/2005 19:08
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…