Sven Gramatke

Manchmal hat man in Excel VBA Formulare, die man auch drucken möchte. Hierfür gibt es den Befehl "printform". hat man aber ein großes Formular und will es auf eine Seite bringen, geht das so:

Application.ScreenUpdating = False  ' Bildschirm wird nicht aktualisiert
UserForm1.Zoom = 50               ' Formular wird auf 50% herunter gezoomt
UserForm1.printform               ' Formular wird gedruckt
UserForm1.Zoom = 100              ' Formular wird auf 100% gezoomt
Application.ScreenUpdating = True   ' Bildschirm wird wieder aktualisiert

UserForm1 muss natürlich durch den Namen des Formulars ersetzt werden.