Habe den Druckbereich in der Tabelle festgelegt,
theoritisch hat der User ja die Wahl den Zoom variable für sich einzustellen,
aber unter 100% (etwa ActiveWindow.Zoom = 76) schickt Excel den Ausdruck
in der korrekten? nicht DinA4-füllenden Version an den Laserdrucker.
Wenn jedoch der Zoom 100% oder größer ist, wird der Ausdruck, ich sag mal,
augenfreundlicher (so würde ich es haben wollen!) auf Seitengröße angepasst, ausgedruckt.
Was müßte man nun machen, das Excel sich "meinen" Wünschen anpasst?
Kann mir da wer helfen?
Ausdruck wird so aufgerufen:
Sub mnuZuwaageausdrucken()
Dim x
x = Application.Dialogs(xlDialogPrinterSetup).Show 'Druckerauswahlmenü anzeigen
'hier bei Abbruch Stop
If x = False Then
Exit Sub
Else
Range("T3:Y37").Select
Selection.PrintOut Copies:=1, Collate:=True
Range("V35").Select
End If
End Sub
Bis bald,
Günter