Macro impression
Fermé
Tof2608
Messages postés
1
Date d'inscription
jeudi 25 août 2016
Statut
Membre
Dernière intervention
25 août 2016
-
25 août 2016 à 15:22
Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016 - 25 août 2016 à 17:31
Ant049 Messages postés 154 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 9 septembre 2016 - 25 août 2016 à 17:31
Bonjour
J'aimerais pouvoir faire 2 commandes macro pour enregistrer en PDF et l'autre imprimer sur mon imprimante de bureau .
Mon classeur comporte plusieurs feuilles et les pages concernées sont celles dont les résultats en bas de page ont une somme dans deux cellules précises .
C'est pour la conception d'un modèle de devis ,donc je ne veux imprimer que les pages qui ont un montant dans une des deux colonnes .
Merci de votre aide
J'aimerais pouvoir faire 2 commandes macro pour enregistrer en PDF et l'autre imprimer sur mon imprimante de bureau .
Mon classeur comporte plusieurs feuilles et les pages concernées sont celles dont les résultats en bas de page ont une somme dans deux cellules précises .
C'est pour la conception d'un modèle de devis ,donc je ne veux imprimer que les pages qui ont un montant dans une des deux colonnes .
Merci de votre aide
A voir également:
- Macro impression
- Spouleur d'impression - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Macro word - Guide
- Jitbit macro recorder - Télécharger - Confidentialité
- Impression livret a5 - Guide
1 réponse
Ant049
Messages postés
154
Date d'inscription
jeudi 4 août 2016
Statut
Membre
Dernière intervention
9 septembre 2016
22
25 août 2016 à 17:31
25 août 2016 à 17:31
Bonjour,
Pour enregistrer en PDF dans "mes documents" :
Pour mise en impression :
Tu n'as plus qu'à ajouter une condition SI concernant la présente de donnée dans les deux cellules de chaque bas de page et boucler sur le nombre de feuilles que tu as.
Pour enregistrer en PDF dans "mes documents" :
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="Nomdetonfichier", Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
Pour mise en impression :
ActiveSheet.PrintPreview
Tu n'as plus qu'à ajouter une condition SI concernant la présente de donnée dans les deux cellules de chaque bas de page et boucler sur le nombre de feuilles que tu as.