Bei Nein - Pogramm beenden
02.08.2007 07:20:00
Heinz
Ich möchte bitte gerne bei unteren Code, wenn ich auf NEIN klicke das das die Arbeitsmappe beendet wird.
Eventuell nochmals mit einer Meldung: Zb. "Bis zum nächsten mal"
Könnte mir bitte dabei jemand helfen.
Danke & Gruß Heinz
Private Sub Workbook_Open()
If MsgBox("Sie dürfen den Spielplan nur öffnen wenn sie ...... !!", vbQuestion + vbYesNo, _
" ") = vbNo Then Exit Sub
Sheets("Haupt").Activate
End Sub