VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Menüpunkt SPEICHERN deaktivieren

Gruppe

Menue

Bereich

Button

Thema

Menüpunkt SPEICHERN deaktivieren

Problem

Wie kann ich im Menü DATEI den Menüpunkt "Speichern" deaktivieren?

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.




ClassModule: DieseArbeitsmappe

Private Sub Workbook_BeforeClose(Cancel As Boolean)
   On Error GoTo ERRORHANDLER
   Application.CommandBars("Worksheet Menu Bar") _
      .Controls("Datei").Controls("Speichern").Enabled = True
ERRORHANDLER:
End Sub

StandardModule: basMain

Sub DeactivateSave()
   With Application.CommandBars("Worksheet Menu Bar") _
      .Controls("Datei").Controls("Speichern")
      .Enabled = Not .Enabled
   End With
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Menue und Button