Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Bewerten Sie hier bitte das Excel-Portal
Home Zurück Vor
Download Beispiel-Arbeitsmappe

Thema

Druck mit und ohne Wasserzeichen

Gruppe

Wasserzeichen

Problem

Die Tabelle soll einmal normal und einmal mit dem Wasserzeichen "Duplikat" gedruckt werden.

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub PrintWithDuplicate()
   With ActiveSheet
      .Shapes("Duplikat").Visible = False
      .PrintOut
      .Shapes("Duplikat").Visible = True
      .PrintOut
      .Shapes("Duplikat").Visible = False
   End With
End Sub

Beiträge aus dem Excel-Forum zu den Themen Druck und Wasserzeichen

PDF Drucken VBA
Generierung von Tabs per VBA + Sammeldruck
Akt. Datum und Uhrzeit am gedruckten Dokument
UserForm im Querformat drucken
zoom auf Druckbereichsbreite anpassen
Bilder in Registerblatt drucken
PDF eventuell Ausdruck sperren?
Druckprobleme....
Tabellenblätter Ausdruck gruppieren
Drucken mit VBA
Bestimmte Zeilen/ Spalten nicht mitdrucken
Diagramme DIN A3 drucken
Automatischen Andruck auf Standartdrucker erzeugen
Druckerauswahl
Blätter autom. ein-/ausblenden + drucken
Kann bestimmten Drucker nicht auswählen
Drucker nicht vorhanden, dann Meldung
Arbeitsmappendruck
Abfrage ob Druckbereich zu groß für Seitenbreite
Druck PDF-Datei
Fehler 1004 beim Druck einer PDF - mit Screenshot
Druckeinstellungen für mehrere Drucke übernehmen
Grafik drucken
Mit Change() o. Calculate() Filtern und Drucken
Druckparameter an neue Datei
Button zum Ausdrucken
Druckparameter an Datei mitgeben
Makro für ereignisabh. Druck verschiedener Seiten
Excel Seriendruck im PDF-Format
Per VBA drucken - Adobe PDF on ne0x
Drucken, nur wenn Bedingung erfüllt ist!
variablen Druckbereich definieren
Mit Makro Virtuelle Drucker (PDF) ansteuern
Standarddrucker festsetzen??
Wann zuletzt ausgedruckt
Excel druckt keine Bilder!
sql Ausdruck like
Excel Druckmakro - VBA Experten gesucht
CommandButton nicht mit ausdrucken
Druckvorschau
Druckerdialog
mehrere Sheets farbig ausdrucken, weshalb ...
Laufzeitfehler Nr. 9 bei Druckerauswahl
Tabelle drucken
UserForm als PDF o. Fax ausdrucken
Druckbefehl hinter CommandButton festlegen?
Druckmakro in Excel @ Josef Ehrensberger
einzelnen Reiter von Multipages ausdrucken
Seitenumbrüche unter Druck-Command Button ...
Drucken mit wenn bedingung