Hallo,
ich möchte eine Datei nur drucken lassen, wenn in bestimmten Zellen auch Werte stehen. ICh ahbe bei Google folgenden VBA Text gefunden. Das klappt aber nicht.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "Prüfbericht" Then
If Range("E3") = "" Or Range("E7") = "" Then
MsgBox "Zellen B3 und D3 müssen vor Druck ausgefüllt sein!"
Cancel = True
End If
End If
End Sub
Kann mir jemand helfen? Ich könnte auch die Datei per PN schicken.
Vielen Dank !!!
Gruss
Daniel
|