Bonjour,
Mon problème est le suivant:
Jj'ai préparé un petit tableau de comptabilité et à la fin de chaque mois j'aimerais utiliser une macro pour l'imprimer.
Mais bien sûr le nombre de lignes change, alors dans ce cas, comment faire pour que la zone d'impression s'adapte, vous remarquerez que sous la dernière inscription il y a 3 lignes vides avant les lignes de résumé. Merci de votre aide
Zone d'impression variable
3 messages
• Page 1 sur 1
- plamb2316
- Nouveau venu
- Messages: 8
- Inscription: 29 Mars 2009, 16:09
- Version Excel: 2007 FR
Zone d'impression variable
Re bonjour,
En complément à ma question j'ai un petit exemple pour illustrer mon propos. Merci d'avance
http://www.excel-pratique.com/~files/do ... stion.xlsx
En complément à ma question j'ai un petit exemple pour illustrer mon propos. Merci d'avance
http://www.excel-pratique.com/~files/do ... stion.xlsx
- plamb2316
- Nouveau venu
- Messages: 8
- Inscription: 29 Mars 2009, 16:09
- Version Excel: 2007 FR
Bonsoir,
avec ce code, tu détermines la zone d'impression (j'ai considéré que "Résultat du Mois" était toujours dans la colonne E.
De plus, l'impression se fait en mode "Paysage", centrée horizontalement, et sur une seule feuille en largeur (il peut y avoir plusieurs feuilles en hauteur)
Si c'est correct, tu peux remplacer le .PrintPreview (aperçu avant impression) par .PrintOut (impression)
avec ce code, tu détermines la zone d'impression (j'ai considéré que "Résultat du Mois" était toujours dans la colonne E.
De plus, l'impression se fait en mode "Paysage", centrée horizontalement, et sur une seule feuille en largeur (il peut y avoir plusieurs feuilles en hauteur)
Si c'est correct, tu peux remplacer le .PrintPreview (aperçu avant impression) par .PrintOut (impression)
- Code: Tout sélectionner
Sub imprime()
With Sheets("Feuil1")
.PageSetup.PrintArea = "$A$1:$K$" & .[E65000].End(xlUp).Row
.PageSetup.FitToPagesWide = 1
.PageSetup.CenterHorizontally = True
.PageSetup.Orientation = xlLandscape
.PrintPreview
End With
End Sub
Notre seule récompense est un "Merci".........
- felix
- Membre impliqué
- Messages: 1549
- Inscription: 11 Août 2007, 20:01
- Localisation: Landerneau, Finistère
- Version Excel: 2003 Fr (PC); 2007 Fr (PC)
3 messages
• Page 1 sur 1
-
- Sujets similaires
- Réponses
- Vus
- Dernier message
-
- Zone d'impression
par naphy » 03 Fév 2011, 17:19 - 5 Réponses
- 194 Vus
- Dernier message par Nad

07 Fév 2011, 20:08
- Zone d'impression
-
- Vérrouillage de la zone d'impression
par BNE » 10 Mars 2008, 19:55 - 2 Réponses
- 561 Vus
- Dernier message par BNE

13 Mars 2008, 11:40
- Vérrouillage de la zone d'impression
-
- Zone d'impression sous Excel
par Avenger22 » 16 Mars 2011, 10:10 - 9 Réponses
- 355 Vus
- Dernier message par Nad

16 Mars 2011, 18:25
- Zone d'impression sous Excel
-
- definir une zone d'impression
par cfn3cfn » 20 Mai 2011, 03:52 - 4 Réponses
- 279 Vus
- Dernier message par cfn3cfn

20 Mai 2011, 09:03
- definir une zone d'impression
-
- Définir une zone d'impression extensible
1, 2par Yvouille » 05 Juin 2007, 22:46 - 10 Réponses
- 2304 Vus
- Dernier message par Yvouille

10 Juin 2007, 07:00
- Définir une zone d'impression extensible
-
- Définir automatiquement une Zone d'impression
1, 2par Gepetto3 » 06 Mars 2009, 16:08 - 13 Réponses
- 1900 Vus
- Dernier message par Gepetto3

02 Avr 2009, 08:58
- Définir automatiquement une Zone d'impression
Utilisateurs en ligne
Utilisateurs parcourant ce forum: Exabot [Bot], Google Adsense [Bot] et 41 invités