Imprimer un Userform

[Sub]

Bonjour a tous !

J'ai realise une Aide (=Texte) à l'interieur d'un Userform.

Je voudrais ajouter un bouton "IMPRIMER" dans de ce Userform pour permettre à l'utilisateur d'imprimer rapidement ce Userform.

Quelqu'un aurait-il une astuce ?

Merci !

 

[Temjeh]

Bonsoir Sub

Derrière ton bouton pour Uform qui se nomme UserForm2 à adapter:

UserForm2.PrintForm

A++

Temjeh

 

[Sub]

Ok , merci à toi !

C'est ce que j'ai fait mais mon userform est imprimé en petit en haut a gauche de ma feuille A4 ; et je pense qu'il n'est malheureusement pas possible de l'ajuster a la taille de ma page.

A +

 

[michel]

bonsoir Sub , bonsoir Temjeh


dans le lien ci-dessous tu trouveras un exemple pour imprimer l'USF centré dans la feuille

Lien supprimé

pour adapter l'image au format de la feuille il te suffira d'ajouter :

With WrdDoc.Shapes(1)
.Width=XXX ' Largeur image
.Height=YYY'Hauteur image
…


bonne soirée
MichelXld

 

[Sub]

Bonsoir Michel !

Merci pour ta réponse !
J'ai cependant un problème :

Dim Wrd As Word.Application (VBA me repond : "Type defini par l'utilisateur non defini")

Tu as une idee ?

 

[michel]

bonjour Sub

dans la procedure il est précisé :
"nécéssite d'activer la référence Microsoft Word xx.x Object Library"

tu vas dans visual Basic Editor (Alt+F11)
dans le menu Outils
Reference
dans la boite de dialoque qui s'affiche , coches la ligne Microsoft Word xx.x Object Library
cliques sur "OK" pour valider


bonne journée
MichelXld

 

[Sub]

Salut Michel !

Ca marche impeccable. Merci beaucoup !

Bonne journee !