PrintPreview et EcranMoniteur XL VBA

Bonjour,

J'ai une question assez general sur l'impression (Screen Display vs PrintPreview).
Je suppose que ce qu'on vois en PrintPreview est identique a ce qu'on imprime.
Par contre la zone selectionnee a l'ecran pour l'impression n'est pas toujours ce qu'on veut une fois imprime.
Je voudrais donc avoir une opinion sur ce qu'on peut faire dans ce domaine.

Comme je ne suis pas sure d'etre tres clair avec ma question, voici un example concret.

1- J'ai une zone que je veux imprimer: Range("E7:AJ" & i & ""), zone qui peut varier en fonction de la variable i.
La taille des 32 columns(E:AJ) est 2.82(38px) a multiplier par 32 columns sur mon ecran, correspondant a 21.6cm de long. Sur un autre ecran, c'est different.
Dans une cells (ou merged cells), j'utilise les proprietes WraptText et EntireRow.AutoFit.

2- Mon PrintPreview me donnera une page A4 de 18cm de large, la longueur/hauteur n'est pas un probleme ici.

Que puis-je faire pour avoir sur mon ecran la meme chose que sur mon impression (Print ou PrintPreview), si toutefois il existe une solution pas ultra complique?

Je recherche plus une direction, une opinion qu'un code tout fait.

Merci,
Jean-Luc

Je ne sais pas si c'est ce que tu souhaite, mais avec ceci tu auras toujours la même vu sur n'importe quel écran !

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Sub test() Dim LarGeur As String   LarGeur = "a1:M25" ' à adapter Feuil1.ScrollArea = LarGeur   '** ici on active le zoom selon l'écran Application.ScreenUpdating = False Range(LarGeur).Select 'à préciser ActiveWindow.Zoom = True Range("a1").Select     End Sub

---

Par contre pour l'impression il serait mieux de faire modifier tes zones d'impression!