Druckbedingungen für jede Tabelle Extra
12.05.2004 17:47:45
elmoro
Hallo Forum,
mit: Option Explicit
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If Worksheets("Tagesnachweis1").Range("c4").Value = "" Then
Cancel = True
End If
End Sub
was ich in "DieseArbeitsmappe" zu stehen habe,
kann ich verhindern, dass das blatt "Tagesnachweis1" gedruckt wird,
wenn zelle "c4" leer ist, Richtig?
Aber wenn ich jetzt z.B. beim Blatt "Tagesnachweis2", den Druck
verindern will, wenn in Zelle "c3" nichts steht, weiss ich nicht weiter
Kann man nicht für jede Tabelle extra festlegen unter welchen Bedingungen
sie gedruckt werden kann und unter welchen nicht?
Die Eingabe in "DieseArbeitsmappe" legt global für alle Tabellen fest
wann gedruckt werden soll.
Kann mir da jemand weiterhelfen, ich bin in VBA auch noch nicht
so bewandert, ich fang erst an:-8
1000 Dank für jede Antwort !!!!!!
Anzeige