Wenn Zelle 0 dann nicht drucken - per VBA

• Wenn Zelle 0 dann nicht drucken - per VBA von Y. Housein vom 14.12.2003 00:54:40
  • AW: Wenn Zelle 0 dann nicht drucken - per VBA - von Ramses am 14.12.2003 08:41:48
    • AW: Wenn Zelle 0 dann nicht drucken - per VBA - von Y. Housein am 16.12.2003 15:11:06

Betrifft: Wenn Zelle 0 dann nicht drucken - per VBA
von: Y. Housein
Geschrieben am: 14.12.2003 00:54:40
Hallo zusammen,

ich möchte das eine Zelle überprüft wird, wenn diese Zelle den Wert bzw. Betrag 0,00 € hat, dann soll es nicht gedruckt werden, ansonsten drucken.

Danke im voraus.

Gruß Yilmaz

Betrifft: AW: Wenn Zelle 0 dann nicht drucken - per VBA
von: Ramses
Geschrieben am: 14.12.2003 08:41:48
Hallo Yilmaz

soll die Zelle nicht gedruckt werden oder die Seite ?

Mit der Seite würde es so gehen:

Option Explicit

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If Worksheets("Tabelle1").Range("A1").Value = 0 Then
'Abbrechen
MsgBox "Der Wert ist NULL. Drucken abgebrochen"
Cancel = True
End If
End Sub

Den Code in das Klassenmodul "Diese Arbeitsmappe" kopieren.

Gruss Rainer

Betrifft: AW: Wenn Zelle 0 dann nicht drucken - per VBA
von: Y. Housein
Geschrieben am: 16.12.2003 15:11:06
Hallo Rainer,

Danke für dein Tipp. Funktioniert super.

Schönen Tag noch.

Gruß

Yilmaz

Excel-Beispiele zum Thema " Wenn Zelle 0 dann nicht drucken - per VBA"
Mehrbereichsauswahl auf eine Seite drucken.	Sichtbare Blätter drucken
Automatische Datumformatierung unterdrücken	Bestätigung beim Speichern unterdrücken.
Kopfzeile in Buchform drucken	In einem Dialog ausgewählte Spalten drucken
Codeblatt mit Rändern drucken	Mehrfachauswahl im Hoch- und Querformat drucken
Tabellenblätter in umgekehrter Reihenfolge drucken	Alle Dateien eines Verzeichnisses drucken