Impression USF

[basma]

Bonjour.
Y a vraiment pas moyen d'imprimer un Userform en Paysage, sur 1 seule feuille A4, sans passer par un copier/coller sur une feuille Excel ou Word svp ???

Car:

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()
Dim Ws As Worksheet

'Copie d'écran de la forme active
keybd_event vbKeySnapshot, 1, 0&, 0&
DoEvents
'
'
'



me causent de gros bugs dans la macro.

D'avance merci les Experts !!!!

Basma

 

[Staple1600]

Re : Impression USF

Bonsoir


Il semblerait que non (a priori)

meme outre-atlantique...

UserForm Landscape

 

[basma]

Re : Impression USF

ok, pas de chance.

Merci beaucoup Staple

Bonsoir


Il semblerait que non (a priori)

meme outre-atlantique...

UserForm Landscape

 

[Spitnolan08]

Re : Impression USF

Bonsoir,

Cela ne répond pas exactement à la question (Car ne permet pas de choisir des options d'impression) mais permet d'imprimer un UF directement.

UserForm1.PrintForm

Cordialement

 

[basma]

Re : Impression USF

Bonjour.

Je suis en Excel 2003.
En annexe, ma macro du UserForm "UPDATE".

Le bug apparaît lorsque je sélectionne dans la bande déroulante " Nom Requête " un élément

Les éléments de la bande déroulante viennent d'une Sheet Excel.

Si je retire Option Exlicit, ça ne buggue plus du tout...???

D'avance merci pour vos conseils!!!!!!!!!!!!!!

 

[Spitnolan08]

Re : Impression USF

Re,

C'est normal puisque la variable a n'est pas déclarée.

Cordialement