fr832
XLDnaute Occasionnel
Bonjour à tous,
j'utilise ce code pour imprimer en PDF
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
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
Les colonnes vont de A à G .
Par avance merci,
mes amitiés à tous