datei "x"-schliessen deaktivieren

Informationen und Beispiele zu den hier genannten Dialog-Elementen:


Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: datei "x"-schliessen deaktivieren
von: Daniele
Geschrieben am: 25.06.2002 - 22:09:13

Hallo,
kann irgendwie verhindert werden dass eine Excel-Datei durch den Schliessen Befehl (oben rechts) geschlossen werden kann?
kann der Knopf deaktiviert werden?

gruss, daniele


nach oben   nach unten

Re: datei "x"-schliessen deaktivieren
von: Robert
Geschrieben am: 26.06.2002 - 08:06:50

Ob man den schliessen button "X" entfernen kann weiß ich nicht aber du kannst dir einen eigenen button machen mit dem es dann nur geht!
Button in Tabelle einfügen und textbox(verstecken) ebenfalls einfügen!

Code in Tabelle einfügen:
Private Sub CommandButton1_Click()
TextBox1.Value = True
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=fname
TextBox1.Value = False
End Sub

Code in "dieseArbeitsmappe" einfügen
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
faname = ActiveWorkbook.Name
speichernja = Workbooks(faname).Worksheets("Tabelle1").TextBox1.Value
If speichernja = False Then
MsgBox "Zum speichern den Button drücken!"
Cancel = True
End If
Workbooks(faname).Worksheets("Auflistung").TextBox1.Value = False
End Sub


mfg Robert

nach oben   nach unten

Re: datei "x"-schliessen deaktivieren
von: Daniele
Geschrieben am: 26.06.2002 - 09:01:27

Hallo Robert

nun, prinzipiell ist dies ein cleveren Ansatz, jedoch bekomme ich eineige Probleme mit "fname": muss ich da den Dateinamen eingeben?

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "datei "x"-schliessen deaktivieren"