gibt es eine Möglichkeit das Ich den Start von VBA durch die Tastenkombination Alt+F11 verhindern kann?
mfg
Ulf_MS
Private Sub Workbook_Open()
Application.OnKey "%{F11}", ""
End Sub
Sub VBAEnable()
With Application
.CommandBars("Worksheet Menu Bar").Controls("extras").Controls("Makro").Enabled = True
.OnKey "%{F8}"
.OnKey "%{F11}"
.OnKey "+%{F11}"
End With
End Sub
Sub VBADisable()
With Application
.CommandBars("Worksheet Menu Bar").Controls("extras").Controls("Makro").Enabled = False
.OnKey "%{F8}", "VBAMessage"
.OnKey "%{F11}", "VBAMessage"
.OnKey "+%{F11}", "VBAMessage"
End With
End Sub
Sub VBAMessage()
MsgBox "Diese Funktion ist deaktiviert.", vbInformation, "Fehler"
End Sub
Gruß Matthias