Ausdruck mit VBA verhindern

Forumthread: Ausdruck mit VBA verhindern
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Ausdruck mit VBA verhindern

15.12.2004 21:50:50

Helmut

Hallo Profis,
wie kann ich mit VBA verhindern, dass andere Nutzer meiner Arbeitsmappe z. B. das 2. Tabellenblatt (egal wie es heißt) ausgedruckt werden kann?
Vielen Dank im voraus für die Unterstützung.
Helmut

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Ausdruck mit VBA verhindern

Beate
AW: Ausdruck mit VBA verhindern

UweD

AW: Ausdruck mit VBA verhindern

Beate

Hallo Helmut,
dieses Makro ins Codefenster "dieseArbeitsmappe":


Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "Tabelle2" Then Cancel = True
End Sub

Aber: Die Nutzer könnten das Makro löschen oder den Tabelleninhalt in ein anderes Blatt kopieren und ab geht der Druck....
Gruß,
Beate

AW: Ausdruck mit VBA verhindern

UweD

VBA Editor öffnen (Alt F11)

Project Explorer öffnen (Strg+R)

"DieseArbeitsmappe" doppelklicken

Im neuen Fenster das Makro einfügen


Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = Sheets(2).Name Then
Cancel = True
MsgBox "Drucken nicht erlaubt"
End If
End Sub

Klappt aber nur, wenn die Datei mit Makro gestartet wird.
Gruß UweD