Zone d'impression défini par VBA

Bonjour,

À l’aide de l’enregistreur de macro dans la feuille tableau de bord j’ai défini une zone d’impression qui va de A8 : N8, la ligne 1 du tableau doit être répétée sur toutes les pages (le vrai tableau contient plusieurs centaines de lignes). La zone d’impression change chaque fois que j’ajoute une colonne à l’aide du bouton ajout de colonne. Une colonne j’ajoute et une colonne se masque (ajout de colonne 2019 la colonne 2017 se masque donc la zone d’impression devrait être A8 : O8 dans ce tableau. Comment faire pour que la zone d’impression s’adapte à la dernière colonne non vide ainsi que la dernière ligne remplie. Merci de prendre un peu de votre temps pour m’aider.

Je joins un fichier.

9poteau.xlsm (656.55 Ko)

Bonjour,

Essaie ainsi :

Set Rng = ActiveSheet.Cells(1).CurrentRegion
    ActiveSheet.PageSetup.PrintArea = Rng.Address
21poteau.xlsm (78.13 Ko)

Bonjour

Parfait ça marche

Rechercher des sujets similaires à "zone impression defini vba"