inserer une userform ds excel pour l'impression

[Youness]

Bonjour, tous le monde

je travaille ds un programme VBA excel, j'utilise des plans images ds des unserforms en introduisant des saisies (texbox et autres )
comment faire pour envoyer cette userform telqu elle est dans excel afin de l'imprimer
Merci d'avance

 

[STephane]

Bonjour

Tu peux utiliser la méthode printform.
Exemple d'instruction :
me.printform 'dans le code d'un bouton sur le formulaire en question

userform1.printform 'dans une autre feuille de code
Cela te convient-il ?


A MA connaissance, il n'y a pas d'aperçu possible directement.
Quelqu'un d'autre sait peut-être comment le copier et coller son image dans une feuille pour en proposer l'aperçu.


Stéphane

 

[MichelXld]

bonjour Youness , bonjour STephane

STephane , dans cet exemple l'image de l'USF est collée dans un document Word pour impression (ou eventuellement pour effectuer un aperçu)

Lien supprimé


bon apres midi
MichelXld

Message édité par: michelxld, à: 28/09/2005 14:52

 

[youness]

Je vous remercie pour votre reponse
je ne veux pas imprimer directement l'userform mais l'inserer d'abord( comme image si c est possible ) dans une cellule excel ,

Merci d'avance ;

 

[MichelXld]

rebonjour

tu peux tester cette adaptation


Option Explicit

Private Declare Sub keybd_event Lib 'user32' ( _
ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, _
ByVal dwExtraInfo As Long)

Private Sub CommandButton1_Click()
'Copie d'écran de la forme active
keybd_event vbKeySnapshot, 1, 0&, 0&
DoEvents

Range('A1').Select
Feuil1.Paste
End Sub



bonne soiree
MichelXld

 

[youness]

Je vous remercie ,
ca marche trés trés bien
Bonne soirée .