Anzeige
Archiv - Navigation
1056to1060
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Schliesskreuz sperren

Schliesskreuz sperren
04.03.2009 20:08:17
Tim
Hallo
Wie kann ich das Schliesskreuz sperren für alle Tabellen?
Danke für Eure hilfe
Gruß
Tim

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Schliesskreuz sperren
04.03.2009 20:29:53
Heinz
Hi,
in Workbook:Before_Close cancel auf True setzen.
mfg Heinz
AW: Schliesskreuz sperren
04.03.2009 20:42:20
Tim
Hallo Heinz
Es funktioniert.
Ist es möglich noch eine Msgbox zu integrieren, die eine Meldung gibt "hier kann nicht geschlossen werden.
Geht das mit
If Cancel=true then
msgbox....
Gruß
Tim
Einfach nur Msgbox! ohne IF (owT)
04.03.2009 20:44:13
Renee

AW: Einfach nur Msgbox! ohne IF (owT)
04.03.2009 20:49:17
Tim
Hallo Renee
Danke! Toll es klappt.
Nochmals Danke
Gruß
Tim
AW: Schliesskreuz sperren
04.03.2009 21:13:16
Tim
Hallo
Habe mich zu früh gefreut. Ich wollte, daß die Datei nur über das Kreuz geschlossen wird, wenn das Blatt Hauptmenu aktiviert ist.
Geht aber nicht.
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Worksheets("Haupmenu").Activate Then
Cancel = False
Else
Cancel = True
MsgBox "Die Datei kann nur über das Hauptmenu geschlossen werden!"
End If
Gruß
Tim
Anzeige
Name testen nicht .Activate!
04.03.2009 21:20:48
Renee
Hi Tim,

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Not (ActiveSheet.Name = "Hauptmenu") Then
Cancel = True
MsgBox "Die Datei kann nur über das Hauptmenu geschlossen werden!"
End If
End Sub


GreetZ Renée

AW: Name testen nicht .Activate!
04.03.2009 21:39:57
Tim
Hallo Renèe
Jetzt klappt es bestens.
Danke vielmal
Gruß
Tim

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige