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

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

Usine à gaz

XLDnaute Barbatruc
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 :

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

  • Réseaux factures mois test PDF.xlsm
    79.5 KB · Affichages: 4
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...

Usine à gaz

XLDnaute Barbatruc
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é ?
 

Usine à gaz

XLDnaute Barbatruc
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 !
 

vgendron

XLDnaute Barbatruc
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.

si tu supprimes le saut de page MAIS que tu mets une mise à l'échelle 1 page en largeur et 2 pages en hauteur. bah.. excel fait deux pages (donc un saut de page).. enfin. je crois..
 

Discussions similaires

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