habe mir ein Makro mittels recorder aufgezeichnet...
Es sollen 2 Blätter ausgedruckt werden, wie kriege ich es per makro hin, dass die zweite seite das wasserzeicehn " Duplikat" erhält.
Danke für die Hilfe
Thomas
Sub Original_Duplikat_Drucken()
' Original_Duplikat_Drucken Makro
' Original Drucken
ActiveWindow.SelectedSheets.PrintOut
'Hier Befehle für Wasserzeichen einrichten
' Duplicat Drucken
ActiveWindow.SelectedSheets.PrintOut
'Hier Befehle für Wasserzeichen wieder entfernem
End Sub
Alternative mit Text "D U P L I K A T" in Kopfzeile
Sub Original_Duplikat_Drucken2() '
' Drucken Original
ActiveWindow.SelectedSheets.PrintOut Copies:=1
' Ändern der mittleren Kopfzeile
With ActiveSheet.PageSetup
.CenterHeader = "&18 D U P L I K A T" 'Text in Schriftgröße 18pt
End With
' Drucken des Dupilkats
ActiveWindow.SelectedSheets.PrintOut Copies:=1
' Zurücksetzen der mittleren Kopfzeile
With ActiveSheet.PageSetup
.CenterHeader = ""
End With
End Sub
Problemstellung
Wie kann ich ein Wasserzeichen in eine Tabelle einfügen?
Problemstellung
Die Tabelle soll einmal normal und einmal mit dem Wasserzeichen "Duplikat" gedruckt werden.
Problemstellung
Wie kann ich alle eingeblendeten Arbeitsblätter einer Arbeitsmappe über ein VBA-Makro ausdrucken?
Problemstellung
Wenn ich in einem Bereich im Zahlenformat "Text" formatierter Zellen über das Menü BEARBEITEN / ERSETZEN die Kommata durch Punkte ersetze, wird ein Teil der Zahlen als Datum ("Apr 98") formatiert. Wie kann ich das verhindern?
Problemstellung
Wie kann ich die Rückfrage beim Speichern, ob die bereits vorhandene Datei ersetzt werden soll, verhindern?
Problemstellung
Bei Büchern sind die Kopfzeilen in der Regel jeweils links und rechts angeordnet. Wie kann ich dieses Layout bei Excel übernehmen?
Problemstellung
Bei XL8 habe ich beim Druck eines Moduls nicht die Möglichkeit der Randeinstellung. Alle Drucke beginnen am äußersten oberern und linken Rand. Wie kann ich das ändern?
Problemstellung
Wie kann ich über VBA den 1. Bereich einer Mehrfachauswahl im Hoch-, den 2. Im Querformat drucken?