Erzwingen, dass Arbeitsblätter auf einem neuen Blatt gedruckt werden (Microsoft Excel)
Eva druckt oft ganze Arbeitsmappen auf einmal. Wenn sie dies tut, druckt sie doppelseitig, damit sie Papier sparen kann. Dies bedeutet jedoch manchmal, dass die erste Seite eines Arbeitsblatts auf der Rückseite der letzten Seite des vorherigen Arbeitsblatts gedruckt wird. Eva fragt sich, ob es eine Möglichkeit gibt, sicherzustellen, dass ein Arbeitsblatt immer auf ein neues Blatt Papier gedruckt wird, wenn ganze Arbeitsmappen doppelseitig gedruckt werden.
Es gibt einen manuellen Weg, dies zu erreichen, und eine automatischere Methode. Bei der manuellen Methode müssen Sie herausfinden, für welche Ihrer Arbeitsblätter eine ungerade Anzahl von Seiten gedruckt werden muss, und dann das Arbeitsblatt zwingen, eine gerade Anzahl von Seiten zu verwenden. Sobald Sie ein solches Arbeitsblatt identifiziert haben, müssen Sie nur noch zum Ende dieses Arbeitsblatts (direkt unter der letzten Zeile) gehen und einen Seitenumbruch einfügen. (Zeigen Sie die Registerkarte Seitenlayout des Menübands an und klicken Sie auf das Werkzeug Unterbrechungen. Anschließend können Sie Seitenumbruch einfügen auswählen.)
Bei der automatischen Methode wird Ihre Arbeitsmappe mithilfe eines Makros gedruckt, anstatt den regulären Befehl Drucken zu verwenden. Das Makro druckt im Wesentlichen jedes Arbeitsblatt einzeln nacheinander. Wenn Sie also 5 Arbeitsblätter haben, druckt das Makro diese als 5 separate Druckaufträge.
Jedes beginnt vorne auf einer neuen Seite. Hier ist das Makro:
Public Sub PrintAllSheets() Dim wks As Worksheet For Each wks In ActiveWorkbook.Worksheets wks.PrintOut Next Set wks = Nothing End Sub
Dieses Makro druckt, wie angegeben, alle Arbeitsblätter in der Arbeitsmappe. Wenn Sie eine Teilmenge der Arbeitsblätter drucken möchten, können Sie das Makro so ändern, dass nur das Arbeitsblatt gedruckt wird, das bei der Ausführung des Makros ausgewählt wurde.
Sub PrintSomePages() Dim wks As Worksheet For Each wks In ActiveWindow.SelectedSheets wks.PrintOut Next Set wks = Nothing End Sub
Eines (oder beide) dieser Makros können problemlos zu Ihrer Symbolleiste für den Schnellzugriff hinzugefügt werden, sodass Sie genau das drucken können, was Sie möchten (alle oder einige)
mit nur einem Klick auf eine Schaltfläche.
_Hinweis: _
Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.
ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.
Dieser Tipp (1984) gilt für Microsoft Excel 2007, 2010, 2013 und 2016.