impression jusqu'a dernière ligne remplie

  • Initiateur de la discussion Initiateur de la discussion fr832
  • 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 !

fr832

XLDnaute Occasionnel
Bonjour à tous,
j'utilise ce code pour imprimer en PDF
Code:
Sub impression_PDF()

    Range("A3:G13").Select
    Application.ActivePrinter = "PDFCreator sur Ne00:"
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
        "PDFCreator sur Ne00:", Collate:=True
End Sub
Je voudrais modifier ce code de façon à remplacer la zone "A3:G13" par une zone automatique en fonction de la dernière ligne remplie.
Les colonnes vont de A à G .

Par avance merci,
mes amitiés à tous
 
Re : impression jusqu'a dernière ligne remplie

Quelque chose du genre : dès lors que la cellule D3(dans l'exemple) est dans la cible et qu'il n'y a pas de zone à blanc dans la plage voulue

Range("d3").Select
ActiveSheet.PageSetup.PrintArea = ActiveCell.CurrentRegion.Address
ActiveWindow.SelectedSheets.PrintOut Copies:=1
 
- 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
1
Affichages
1 K
Réponses
24
Affichages
3 K
Retour