XL 2013 Définir une une zone d'impression ajustée en fonction de la hauteur mouvante d'un tableau

  • Initiateur de la discussion Initiateur de la discussion Chrystel01
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Chrystel01

XLDnaute Occasionnel
Bonsoir,

J'ai un tableau alimenté régulièrement par des enregistrements via vba.
Comment faire pour que la définition de la zone d'impression change en fonction de la hauteur du tableau ?

Merci d'avance

Chrystel.
 
Bonsoir Chrystel01,

Une méthode classique est de créer le nom Tableau défini dynamiquement par la formule :
Code:
=DECALER(Feuil1!$A$1;;;NBVAL(Feuil1!$A:$A);4)
le tableau étant en Feuil1 en A1 avec 4 colonnes.

Il suffit de définir ensuite le nom Zone_d_impression par =Tableau

A+
 
bonjour chrystel01 bonjour job75 bonjour le forum
une possibilité avec une macro
colonne de A a E (sélection du tableau avec la couleur rouge, à adapter
(définir portrait ou paysage dans la feuille)
(pour la dernière ligne de la zone d'impression, recherche colonne A avec la couleur verte, à adapter)

Enrichi (BBcode):
Sub impressiondynamique()

ActiveSheet.PageSetup.PrintArea = Range("A1:E" & Range("A65536").End(xlUp).Row).Address
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
End Sub
cordialement
galougalou
 
Dernière édition:
Comment fait on l'affectation du tableau à la fonction decaler et à la zone d'impression ?
Cela se fait dans la macro ?
Pas besoin de macro, voyez le fichier joint et cliquez sur le menu Formules => Gestionnaire de noms.

Le nom Tableau est défini dans le Classeur, le nom Zone_d_impression est défini dans la feuille.

Bonjour GALOUGALOU.
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
10
Affichages
304
Retour