XL 2021 Créer un pdf en deux pages pour 2 plages d'une même feuille

  • Initiateur de la discussion Initiateur de la discussion Usine à gaz
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous 🙂

Je n'arrive pas à sortir mon pdf comme je le voudrais Grrrr ! 😡

Est-il possible de Créer un pdf en deux pages pour 2 plages d'une même feuille ?
Exemple :
1683128919006.png

Dans ma feuille, j'aimerais :
- une plage : "a1:ag60" sur la page 1 du pdf,
- une plage : "a61:fin de page" sur la page 2 du pdf,

J'ai pas réussi et toutes les recherches que j'ai faites ne m'ont pas permis de trouver le bon code.

Auriez-vous le bon code ?
Je joins un petit fichier test...

Grand merci à toutes et à tous,
Je continue mes recherches...
🙂
 

Pièces jointes

Solution
Apparemment, il faut que les sauts de page soient affichés
VB:
Sub imprim_pdf()
    ActiveSheet.PageSetup.PrintArea = "$A:$AG"
    
    With ActiveSheet.PageSetup
        .LeftHeader = ""
        .CenterHeader = ""
        .RightHeader = ""
        .LeftFooter = ""
        .CenterFooter = ""
        .RightFooter = ""
        .LeftMargin = Application.InchesToPoints(0)
        .RightMargin = Application.InchesToPoints(0)
        .TopMargin = Application.InchesToPoints(0)
        .BottomMargin = Application.InchesToPoints(0)
        .HeaderMargin = Application.InchesToPoints(0)
        .FooterMargin = Application.InchesToPoints(0)
        .PrintHeadings = False
        .PrintGridlines = False
        .PrintComments = xlPrintNoComments...
Déjà, merci à toi d'être là !
OUI, je sais mais il est un peu confidentiel.
J'ai ajouter ce code :
Worksheets("ExpRealty").Columns("af").PageBreak = xlNone
Mais rien n'y fait.
M'autorises-tu à t'écrire en privé ?
😡
 
LOL, ça pourrait être vrai = J'ai une réputation à tenir 😛😇

Mais je viens de résoudre le souci.
J'ai supprimé la feuille et je l'ai refaite.
Tout fonctionne sur toutes mes feuilles.

Merci vraiment pour ta patience et ta gentillesse.

Ce qui m'embête... c'est que je ne saurai peut-être jamais pkoi je n'arrive pas à supprimer ce P..... de saut de page.

Mais j'ai gardé un fichier avec le saut de page. On verra bien !
🙂
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
5
Affichages
592
Retour