Bonsoir à tous
Dans un tableau ou le nb de lignes varie, cette macro me permet de sauvegarder au format PDF mon tableau de la cellule A1:M63 même si toutes les lignes ne sont pas renseignées et c’est gênant pour moi.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 Range("A1:M63").Select
 ActiveSheet.PageSetup.PrintArea = "$A$1:$M$63"
 ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
 "C:\Compta \PDF\journal.pdf", Quality:= _
  xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
 OpenAfterPublish:=True
J’aimerais ne sauvegarder le tableau que jusqu’à la dernière ligne renseignée.
Problème, si je peux connaitre le numéro de la dernière ligne renseignée grâce à :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
   Range("C13").Select
    Selection.End(xlDown).Select
    DerniereLigne = ActiveCell.Row
Je suis incapable de rentrer cette valeur «Derniere Ligne » dans mes lignes ci-dessus 1) et 2)
Je suis certain qu’un cerveau du forum pourra me sortir cette épine du pied.
A l’avance merci