S Seddiki_adz XLDnaute Impliqué 2 Mai 2022 #1 Bonsoir j'ai besoin d'un code pour filtre et un code pour imprimer automatiser Merci Pièces jointes filter et impresion1.xlsx 21.7 KB · Affichages: 3
Solution Phil69970 2 Mai 2022 @Seddiki_adz Tout est dans le code VB: Sub Impression() Sheets("Feuil1").PrintPreview 'Visualise l'impression 'Sheets("Feuil1").PrintOut 'Lance l'impression End Sub Il te suffit de désactiver avec une apostrophe la 1ere ligne et d'activer la 2eme ligne VB: Sub Impression() 'Sheets("Feuil1").PrintPreview 'Visualise l'impression Sheets("Feuil1").PrintOut 'Lance l'impression End Sub *Merci de ton retour @Phil69970
@Seddiki_adz Tout est dans le code VB: Sub Impression() Sheets("Feuil1").PrintPreview 'Visualise l'impression 'Sheets("Feuil1").PrintOut 'Lance l'impression End Sub Il te suffit de désactiver avec une apostrophe la 1ere ligne et d'activer la 2eme ligne VB: Sub Impression() 'Sheets("Feuil1").PrintPreview 'Visualise l'impression Sheets("Feuil1").PrintOut 'Lance l'impression End Sub *Merci de ton retour @Phil69970
Phil69970 XLDnaute Barbatruc 3 Mai 2022 #16 @Seddiki_adz Le fichier modifié mais je m’arrête la car il y a pas de limite autrement donc c'est ma dernière modification sur ce fichier. @Phil69970 Pièces jointes Filtre et impression V3.xlsm 31.3 KB · Affichages: 4 Vote positif 0 Vote négatif
@Seddiki_adz Le fichier modifié mais je m’arrête la car il y a pas de limite autrement donc c'est ma dernière modification sur ce fichier. @Phil69970
S Seddiki_adz XLDnaute Impliqué 3 Mai 2022 #17 Phil69970 à dit: @Seddiki_adz Le fichier modifié mais je m’arrête la car il y a pas de limite autrement donc c'est ma dernière modification sur ce fichier. @Phil69970 Cliquez pour agrandir... Merci c'est excellent Vote positif 0 Vote négatif
Phil69970 à dit: @Seddiki_adz Le fichier modifié mais je m’arrête la car il y a pas de limite autrement donc c'est ma dernière modification sur ce fichier. @Phil69970 Cliquez pour agrandir... Merci c'est excellent