stampare userform

Buonasera,
vorrei sapere come si può stampare uno userform in orizzontale.
per stamparlo basta usare il codice: UserForm1.PrintForm
ma la stampa è in verticale menter a me serve orizzontale.

Grazie mille
REEF

ciao reef30
vista la tua domanda prova a inserire in un modulo questa quattro righe per la stampa
------------------------
Sub StampaOriz()

If MsgBox("Confermi Stampa ?", Title:=" STAMPE ", Buttons:=vbCritical + vbYesNo) = vbYes Then
With ActiveSheet.PageSetup
.Orientation = xlLandscape
End With

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

With ActiveSheet.PageSetup
.Orientation = xlPortrait
End With
End If
Cells(2, 1).Select
End Sub
---
in activewindow prova a sostituirla con -- UserForm1.PrintForm --
e vedi se il risultato e' quello voluto
ciao e buon locate

ciao reef30
girando in internet mi sono imbattuto in un VBA che fa al caso tuo
o scaricato questi e con alcune modifiche lo reso operante al caso tuo non posso metterti il listato perche' si avvale di un modulo e di un bottone.
mette la pagina orizzontale e puoi stabilire anche i margini senza ricorrere alle impostazioni stampanti
ti allego il file di prova controlla il modulo e le propieta' dei pulsanti uno e' nel foglio e uno nella form
fai sapere se e' OK
ciao e buon ancora da locate

Perfetto!
Grazie mille è proprio quello che mi serviva.
Avevo già postato il quesito in altri forum ma è la prima volta che qualcuno riesce a darmi una soluzione.

Alla prossima
REEF

ciao
o visto che il codice che ti o creato a soddisfatto le tue esigenze
e ieri sera tanto che in televisione cera solo calcio ti o fatto delle migliorie con i vari controlli al foglio come centraggio automatico della form sul foglio e il dimensinamento di questa in stampa a tuo piacimento, dato che forse avrai visto che tratta la form come se fosse un Bitmap, quindi la possiamo trattare come questi.
il secon file e le migliorie le trovi nella discussione che o aperto
ciao e buon da locate
NB NB
SE AI dei problemi DOMANDA avrai sempre qualche risposta da qualsiasi persona disposta ad aiutarti

[POSTQUOTE][QUOTE:93134514=locatevaresino, 18/04/2009 2.40]ciao reef30
girando in internet mi sono imbattuto in un VBA che fa al caso tuo
o scaricato questi e con alcune modifiche lo reso operante al caso tuo non posso metterti il listato perche' si avvale di un modulo e di un bottone.
mette la pagina orizzontale e puoi stabilire anche i margini senza ricorrere alle impostazioni stampanti
ti allego il file di prova controlla il modulo e le propieta' dei pulsanti uno e' nel foglio e uno nella form
fai sapere se e' OK
ciao e buon ancora da locate[/QUOTE][/POSTQUOTE]

Grazie mille

grazie

Ottimo...Ho risolto anche io!!! Grazie

solo per salutare e ringraziare per il download.

grazie per il download