Zusätliche MsgBox wenn H10 leer ist
24.03.2007 23:53:00
Heinz
Habe unteren Code der mir eine MsgBox öffnet und den Druck abbricht,
wenn im Sheet "Eingabe" die Zelle K6 leer ist.
Nun möchte ich zusätzlich eine MsgBox "Toleranz eingeben"
und den Druck abbrechen wenn im Sheets "Eingabe" die Zelle H10 leer ist.
Könnte mir bitte dabei jemand weiterhelfen ?
Danke & Gruß Heinz
If Sheets ("Eingabe").Range ("K6") " " Then
Worksheets ("311") . Visible = True
Sheets ("311") . PrintOut
Worksheets ("311") . Visible = False
Else
MsgBox "K6 ist leer"
End If
End If