Code aperçu qui ne fait pas bien ce qu'il devrai

bonsoir a tous et toutes

je suis en cours de créer mon entête dans le code et dans le fichier joints j'ai un souci avec le code de l'aperçu qui ne respecte pas cette ligne

.PrintArea = "A1:K" & DerLig

mais plutôt une coupure en 2 feuilles car l'aperçu montre seulement

.PrintArea = "A1:G" & DerLig

et je ne sais pas pourquoi car le code est extrait d'un fichier où il fonctionne telque

Pascal

Bonsoir,

La zone d'impression est respectée.

Ton problème doit être ailleurs.

Cordialement

Ferrand

bonsoirMferrand

merci de ta réponse et de me conforter pour mon code

je pensais bien que ce n'était le code cela dois venir du saut de page qui est en bas de mon excel2013

car quand je clic sur le bouton le plus a gauche des trois voila ce que j'ai

mais si je rectifie sur cette page c'est très bien tant que le code n'est pas lancer

Pascal

Bonsoir,

Je pense qu'il te faut régler PageSetup.FitToPagesWide à 1.

Et par la même occasion aussi : .FitToPagesTall.

Bonne soirée

Ferrand

bonsoir

Mferrand si tu as ouvert mon fichier tu a du voir que les lignes que tu cites sont

'.FitToPagesTall = 1
                 .FitToPagesWide = 1

dont la 1ere est cochée je ne sais plus pourquoi, mais en la décochant ce n'est pas mieux rien n'a changer

Pascal

.Zoom doit être à False pour que ça s'applique. Voilà la raison !

Ferrand

bonsoir Mferrand

merci si je mets 0 a zoom ca bug mais si je le mets en commentaire c'est mieux et l'aperçu fonctionne bien mieux

mais fait la même opération dans le classeur originel se ne change rien, mais je vais clore le post et voir le pourquoi car ce sont trait pour trait les mêmes hormis des feuilles et codes

Pascal

.Zoom est défini entre 10 et 400, donc 0 est une valeur erronée. Pour le désactiver : =False.