Noch eine Frage, vielleicht "Orakel" ?
28.10.2006 21:11:00
Walter
hatte von Orakel dies Lösung für das Ausschalten von ALT+F11:
Sub F11_ausschalten()
Dim i As Byte
On Error Resume Next
With Application
i = 11
.OnKey "%{F" & i & "}", ""
End With
End Sub
Sub F11_einschalten()
Dim i As Byte
On Error Resume Next
With Application
i = 11
.OnKey "%{F" & i & "}"
End With
End Sub
Jetzt brauch ich das noch für ALT+TAB, damit man nicht das Makro aussuchen kann,
gruß Walter
