XL 2010 USER FORM VERS PDF

Loulou13300 · 5 Novembre 2019

Bonjour,

Voici mon Userform en PJ, je souhaite que lorsque j'appuie sur le bouton PDF, ce dernier enregistre mon Userform sous le format PDF afin de pouvoir ensuite l'imprimer.

J'ai vraiment besoin d'aide car je n'y arrive absolument pas malgré le fait que je regarde tous les forums.

Merci d'avance.

patricktoulon · 6 Novembre 2019

bonjour kiki69
un petit ajout qui pourrait t'etre utile
dans le pagesetup

VB:

Set shap =Activesheet.Shapes(1)
.Orientation = IIf(shap.Width / shap.Height > shap.Height / shap.Width, xlLandscape, xlPortrait)

ou meme simplement

VB:

 .Orientation = IIf(Me.Width / Me.Height > Me.Height / Me.Width, xlLandscape, xlPortrait)

XL 2010 USER FORM VERS PDF

Loulou13300

XLDnaute Nouveau

Pièces jointes

patricktoulon

XLDnaute Barbatruc

Discussions similaires