Excel Forum - Porady, Pomoc, Excel Help, Excel FAQ - Userform.PrintForm problem z drukowaniem

rexibit · słuchacz Posty: 6

Witam
Mam utworzony Formularz z kilkoma polami do których pobierane sa wartości z rożnych arkuszy.
Chciałbym wydrukować widoczny formularz bez tworzenia pomocniczego dodatkowego arkusza w który by Userform wpisywał te dane.
I tu jest problem:
Pod przycisk podpiełem kod:

Private Sub CommandButton1_Click()
UserForm1.PrintForm
End Sub

i fajnie jest bo drukuje sie ale na kartce pionowo
jak oprogramowac to aby sie drukowało poziomo , wyśrodkowane na stronie bez skalowania?

dziekuję
pozdrawiam

negatyv · Wysłany: 2012-02-09, 15:37

Skoro nikt nic nie piszę to napiszę co sobie o tym myślę :)
Generalnie formularze edycji i wydruki rządzą się innymi prawami i nie powinno się stosować tej samego wzoru do obu. Formularze powinny być zoptymalizowane pod kątem edycji danych a wydruki pod kątem ich przeglądania. Na przykład na formularzu możesz zamieścić podpowiedzi, których nie chcesz na wydruku. Z drugiej strony na wydruku możesz umieścić takie informacje jak ilość stron, data wydruku czy użytkownik, który wydrukował, co jest nieistotne na formularzu.

Tak więc lepiej jednak stworzyć osobny arkusz (np.: xlVeryHidden) i na nim stworzyć profesjonalny wydruk, wykorzystując całe możliwości formatowania w Excelu.

Jeżeli jednak się upierasz, to model obiektowy nie przewiduje ustawień wydruku dla formularzy (chyba, że coś przegapiłem). Musisz wykorzystać API, żeby zmienić ustawienia samej drukarki.
http://pubs.logicalexpres...cle.asp?ID=116,

lub zrobić jakąś karkołomną konstrukcję przy pomocy sendkeys.
http://msdn.microsoft.com...office.10).aspx

Pamiętaj tylko, żeby przywracać ustawienia drukarki po wydruku, żeby użytkownik nie był zaskoczony.