Herbers Excel-Forum - das Archiv

Exit Sub + weiteren Bedingung ???

Bild

Betrifft: Exit Sub + weiteren Bedingung ???
von: Denise

Geschrieben am: 24.02.2005 09:31:39
Hallo,
kann mann den Befehl "Exit Sub" mit den Befehl "ActiveSheet.Protect Password:="????" kompinieren (in einer If-Then Abfrage), dh. wenn die Bedingung eintritt das Programm zu verlassen, dann soll es vorher noch geschützt werden.
Vielen Dank!
Gruß
Denise
Bild

Betrifft: AW: Exit Sub + weiteren Bedingung ???
von: UweD

Geschrieben am: 24.02.2005 09:54:19
Hallo Denise

Klar geht das
einfach vor das Exit setzen

If Bedingung = wahr Then
MsgBox "OK"
Else
ActiveSheet.Protect Password:="????"
Exit Sub
End If
'hier hgehts normal weiter
'
 Bild
Excel-Beispiele zum Thema "Exit Sub + weiteren Bedingung ???"
Nach Eingabe eines S keine weiteren Eingaben möglich Weiteren Verlauf prognostizieren
Wert aus Spalte C, wenn Spalten A und B Bedingungen erfüllen Beim Erfüllen einer Bedingungen Farbe für 1 Minute
Anzahl von Werten nach verschiedenen Bedingungen. Zeilen zählen, in denen zwei Bedingungen zutreffen
Dem Zellkontextmenü ein Menü "Zahlungsbedingungen" hinzufügen Wert eintragen, wenn Bedingte-Formatierung-Bedingung zutrifft
Zelle markieren, wenn zwei Bedingungen erfüllt sind