VBA - Imprimer auto mise en page les lignes remplies

Bonjour à tous !

Voila mon problème.

Je souhaite imprimer mon tableau "elephant chart general".

Cependant les lignes sont remplies via des formules & extractions.

Je souhaite avoir la mise en page avant l'impression ou seules mes cellules remplies fassent parties de l'impression automatiquement.

Car du coup lors de l'impression j'ai plein de lignes avec des cases vides qui apparaissent...

Sans avoir à faire "mise en page", sélectionner "zone impression" et définir manuellement ma zone d'impression à chaque fois...

Merci pour votre aide !!!

Janot.

Bonsoir,

utilise le code suivant :

Sub MiseEnPageImpression()
    derLig = Sheets("Macro").Range("E" & Rows.Count).End(xlUp).Row
    Sheets("ELEPHANT CHART GENERAL").PageSetup.PrintArea = "$A$5:$X$" & derLig
End Sub

Bonjour Raja,

Super !! J'ai modifié le A5 en A1 pour avoir mon haut de page et c'est parfait !!!

Merci grandement !!!

Bonne journée !!! ++