Zoom = true Impossible

winflow Messages postés 157 Date d'inscription   Statut Membre Dernière intervention   -  
winflow Messages postés 157 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

With Sheets("Page").PageSetup
        .Zoom = False
        .FitToPagesWide = 1
        .FitToPagesTall = 1
        .PrintArea = "A1:T" & last_row
        .LeftMargin = Application.InchesToPoints(0)
        .RightMargin = Application.InchesToPoints(0)
        .TopMargin = Application.InchesToPoints(0)
        .BottomMargin = Application.InchesToPoints(0)
        .HeaderMargin = Application.InchesToPoints(0)
        .FooterMargin = Application.InchesToPoints(0)
End With



J'ai une erreur au niveau de mon zoom. Comment remédier à ce problème ? J'ai essayé de le mettre à false et ça fonctionne mais il faut qu'il soit à true !

Merci d'avance
A voir également:

1 réponse

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,
ex:
.Zoom=90 ----->zoom a 90%
0
winflow Messages postés 157 Date d'inscription   Statut Membre Dernière intervention   22
 
on peut également mettre zoom à false ou true.
A chaque fois je le met à true (je ne sais pas à quelle valeur cela correspond) et cela m'a permis d'avoir ce que je voulais jusqu'à lors alors je souhaite avoir true uniquement
0
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Slt,

Non, on ne peut pas mettre la propriété Zoom à True ...

Voici ce que dit l'aide :

Cette propriété renvoie ou définit une valeur de type Variant qui représente un pourcentage (compris entre 10 et 400 pour cent) utilisé par Microsoft Excel pour une mise à l'échelle de la feuille de calcul, en vue de son impression.
Syntaxe

expression.Zoom

expression Variable qui représente un objet PageSetup.

Remarques

Cette propriété s'applique uniquement aux feuilles de calcul.

Si cette propriété a pour valeur False, la mise à l'échelle de la feuille de calcul est déterminée par les propriétés FitToPagesWide et FitToPagesTall.

Quelle que soit l'échelle choisie, le rapport hauteur-largeur du document original est conservé.
0
winflow Messages postés 157 Date d'inscription   Statut Membre Dernière intervention   22
 
Si puisque je fais exactement la même chose dans une autre fonction avec
.Zoom = true

et cela fonctionne aucune erreur .
0
winflow Messages postés 157 Date d'inscription   Statut Membre Dernière intervention   22
 
La seule différence entre ces deux fonctions c'est que l'une se trouve dans un module et l'autre dans userform et meme en mettant la deuxième fonction dans un module cela ne fonctionne pas
0