Imprimer un UserForm

[Marco60]

Salut le forum,
je suis à la recherche du code VBA pour imprimer un UserForm.

Merci d'avance pour votre aide

Marc

 

[Eric C]

Bonjoir le forum
Bonjoir Marco60

Essaies :

UserForm1.PrintForm

Bonne fin de ouikand à toutes & à tous 😉

 

[Marco60]

Bonjoir Eric C,
merci pour le code que je vais tester un peu plus tard.

Par contre, serais-tu un Fan de Bigard???

A+

Marc

 

[Eric C]

Re le forum
Re bonSoir Marco60

Fan, non mais j'apprécie son humour. Il est exact que j'utilise le bonjoir lorsque je n'arrive pas à me situer en fin d'après-midi ou en début de soirée....Arf...🙂

Bien à toi . 😉

 

[cbmva]

Bonjour
Recherche sur le net un fichier vraiment génial de Michel Pierron 'MPFE' et qui s'appelle : MP-SceenCopy.xls
Je l'utilise actellement pour une de mes petites adaptation.
Il répond complétement à ton problème

 

[Marco60]

Bonsoir Eric C, cbmva,
Le code marche mais que faut-il mettre pour que cela s'imprime au format paysage?

Merci encore pour votre aide

Marc

 

[MichelXld]

bonjour à tous

Marc , tu peux consulter ce lien et nottament la solution proposée par Ti

Ce lien n'existe plus


bonne journée
MichelXld

 

[Marco60]

Bonsoir le fil,
merci pour le lien, Michel, mais chez moi cela ne fonctionne pas.
En fait, pour Keybd_event, on me met 'Sub ou fonction non défini' et je ne sais pas ca que sont les 'Shapes'.
Donc moi pas comprendre!!!

A+

Marc

 

[MichelXld]

rebonjour Marc

as tu ajouté la fonction 'keybd_event' tout en haut du module ?

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


bonne journée
MichelXld