sortie imprimante d'un USERFORM

[Hugues]

Bonjour Le Forum,

Je souhaiterais connaître la commande à appliquer à un bonton d'un userform, afin d'imprimer sur papier le contenu du USERFORM.

Merci à vous tous,

Hugues

 

[excalibur]

bonjour Hugues , le forum code : printform Private Sub CommandButton2_Click()
PRINTFORM end sub ' salutations

 

[Abel]

Bonjour Hugues,

Qu'appelles tu 'imprimer le contenu d'un userform' ?

Pour imprimer le usf lui même il faut que je regarde. A moins que quelqu'un d'autre passe par là avant ...

Sinon, si ce n'est 'que' le contenu, je ne vois guère d'autre solution que de passer par un enregistrement (même temporaire) des info du usf sur une feuille pour imprimer ensuite cette feuille.

sgdg (sans garantie du gouvernement, arf !) :

sheet.add
Nllefeuille=activesheet.name
range('a1').me.combox1.value
range('a2').me.textbox1.value
'enfin bref, tout ce que peut contenir ton usf
sheets(nllefeuille).printout
sheets(nllefeuille).delete

Ca devrait :
créer une nouvelle feuille,
copier dedans le contenu du usf en cours,
imprimer cette feuille,
supprimer cette feuille.


Abel.

 

[Hugues]

Bonjour Excalibur,
Bonjour Abel,

Merci pour les tuyaux.
Cela fonctionne.

Hugues

 

[sambala]

Re : sortie imprimante d'un USERFORM

bonjour Abel, bonjour Hugues,

tout comme Hugues j'ai le même objectif, je souhaite également imprimé la totalité du contenu de mon userform sur une feulle, mais la macro ne fonctionne pas.
elle bloque sur la premiere ligne "Sheets.add"
que dois je faire ?

je vous envoie mon exemple qui n'ai pas de ma création d'ailleur mais qui ma permis d'apprendre beaucoup sur le fonctionnement.
merci encore à l'auteur de la macro.

cordialement