Bonjour,

Je souhaite imprimer uniquement la dernière page d'un onglet excel.

Mes lignes sont variables en fonction des données saisies au préalable, j'ai donc inséré une zone d'impression automatique via le code suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Dim DerLig As Long
    DerLig = Range("D" & Rows.Count).End(xlUp).Row
    ActiveSheet.PageSetup.PrintArea = "a1:n" & DerLig
Il arrive que cette zone d'impression représente plusieurs pages, comment puis-je faire pour imprimer que la dernière page.
J'ai essayé de redéfinir ma zone d'impression en fonction de la dernière ligne sans succès... :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Dim DerLig As Long
 
    DerLig = Range("D" & Rows.Count).End(xlUp).Row
    ActiveSheet.PageSetup.PrintArea = ("a1:n" & DerLig) - ("a1:n" & DerLig - 30)
Si quelqu'un a eu le problème, merci de m'éclairer.
Xavier