Ändern Sie die Verfügbarkeit für die Kontextmenüs mit VBA in Microsoft Excel
Das folgende Makro zeigt, wie Sie den Verfügbarkeitsstatus für die Kontextmenüs umschalten können.
Sub ToggleCommandBars()
Dim cbEnabled As Boolean
cbEnabled = Not CommandBars(25).Enabled
CommandBars(25).Enabled = cbEnabled ' shortcutmenu for cells
CommandBars(26).Enabled = cbEnabled ' shortcutmenu for columns
CommandBars(27).Enabled = cbEnabled ' shortcutmenu for rows
CommandBars("Toolbar List").Enabled = cbEnabled ' shortcutmenu for toolbars
End Sub