Impression Userform

[TINOU]

Bonjour le Forum,



Je souhaiterais imprimer un userform en pleine page en mode portrait(format A4), sans modifier la taille du userform tel qu'il apparait à l'écran
Pour l'instant j'arrive à imprimer mais uniquement sur un petit 3/4 de page.😕

Ci-dessous le code utilisé derrière le bouton imprimer:

Dim l As Control
For Each l In Me.Controls
If TypeName(l) = Label Then l.BackColor = &HFFFFFF
Next l
res = Me.Height
Me.Height = 157
Me.PrintForm
Me.Height = res

Merci d'avance pour votre aide

Tinou.

 

[jeanpierre]

Re : Impression Userform

Bonjour TINOU, re le forum,

Je n'ai pas de réponse, sauf à faire une recherche sur le forum et ses archives, mais as-tu regarder, en bas de ton fil, les cinq discussions similaires ?

Peut-être une solution rapide pour toi.

Je te laisse découvrir et je reviens tout à l'heure, maintenant.... Problème mémoire de l'ordi...

A te lire

Jean-Pierre