Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Msgbox über rotes X schließen

Msgbox über rotes X schließen
16.04.2018 08:13:53
Nati
Guten Morgen,
folgendes Problem: wie schaffe ich es eine Msgbox über das rote X zu schließen, sodass der restliche Code danach nicht mehr ausgeführt wird ? (momentan läuft der restliche Code trotzdem:
Userbild
mein Code, der leider nicht so funktioniert...:
answer = MsgBox("Please select the file of the SWAT Data Extract", vbOKOnly + vbInformation, _
"File selection.")
Select Case answer
Case -1 'Gesichert Format(Date(),"DD.MM.YYYY")
Exit Sub
Case 0 'Abgebrochen
Exit Sub
End Select
Danke für jede Hilfe =)
Gruß Nati
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
weil answer immer 1 ist owT
16.04.2018 08:37:04
Matthias
AW: Msgbox über rotes X schließen
16.04.2018 08:45:47
UweD
Hallo
die vbOKonly Option ist eine reine Anzeige und erlaubt keine Unterscheidung.
Der Rückgabewert ist auch nicht -1 sondern 1 (vbOk)
Möchtest du Abbrechen/OK unterscheiden, dann musst du es auch anbieten.
    Dim Answer

    Answer = MsgBox("Please select the file of the SWAT Data Extract", vbOKCancel + vbInformation, _
    "File selection.")
    
    Select Case Answer
        Case vbOK '=1 'Gesichert Format(Date(),"DD.MM.YYYY") 
            MsgBox "ok"
            Exit Sub
    
        Case vbCancel '=2 'Abgebrochen oder rotes X 
            Exit Sub
    
    End Select
Dabei ist es egal ob Abbrechen oder X gedrückt wird
LG UweD
Anzeige
AW: Msgbox über rotes X schließen
16.04.2018 09:33:43
Nati
Hi Matthias, hallo Uwe,
super, danke euch =).
LG Nati
AW: gern geschehen owt
16.04.2018 09:35:34
UweD
;

Forumthreads zu verwandten Themen

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