Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zusätliche MsgBox wenn H10 leer ist

Zusätliche MsgBox wenn H10 leer ist
24.03.2007 23:53:00
Heinz
Hallo Leute
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
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Probier mal ...
25.03.2007 06:11:14
Matthias
Hallo Heinz
Entweder so

Sub DruckenOderAbbrechen()
If Sheets("Eingabe").Range("K6")  "" And Sheets("Eingabe").Range("H10")  "" Then
Worksheets("311").Visible = True
Sheets("311").PrintOut
Worksheets("311").Visible = False
Else
If Sheets("Eingabe").Range("K6") = "" Then MsgBox "K6 ist leer"
If Sheets("Eingabe").Range("H10") = "" Then MsgBox "H10 ist leer"
End If
End Sub
oder so

Sub DruckenOderAbbrechen()
If Sheets("Eingabe").Range("K6")  "" And Sheets("Eingabe").Range("H10")  "" Then
Worksheets("311").Visible = True
Sheets("311").PrintOut
Worksheets("311").Visible = False
Else
If Sheets("Eingabe").Range("K6") = "" Then MsgBox " Druckauftrag abgebrochen ! ", , "  Fehler  _
in K6": End
If Sheets("Eingabe").Range("H10") = "" Then MsgBox " Druckauftrag abgebrochen ! ", , "  _
Toleranz - Fehler in H10": End
End If
End Sub
Gruß Matthias
Anzeige
AW: Probier mal ...
25.03.2007 11:44:00
Heinz
Hallo Matthias
Danke für Deine Hilfestellung !!
Werde es heute abend in der Arbeit testen.
Danke & noch einen schönen Sonntag,Heinz
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige