| VBA-Code: | ||
| Sub Workbook_Open() 'Code in DieseArbeitsmappe! Application.OnKey "{DEL}", "Entfernen" End Sub Sub Entfernen() 'Code in ein Modul! MsgBox "Taste Entfernen wurde gedrückt" End Sub Gruß Jürgen
Bla Bla Del Bla Bla....
NoNet
Hallo rofu, kopiere dazu folgenden Code in ein allgemeines Modul (z.B. "Modul1") :
|
| VBA-Code: |
| Sub ENTF_Aktivieren() 'Bei Betätigen der ENTF-Taste wird Makro "Bla" ausgeführt : Application.OnKey "{del}", "bla" End Sub Sub ENTF_Deaktivieren() 'Bie Betätigen der ENTF-Taste wird kein Makro ausgeführt = STANDARD ! Application.OnKey "{del}" End Sub Sub Bla() MsgBox "Bla" End Sub Beachte, dass dadurch das Standard-Verhalten der ENTF-Taste verändert wird ! Gruß, NoNet
mit Application.OnKey
Matthias
Hallo Application.OnKey "{DEL}", "los"
AW: mit Application.OnKey
JogyB
Hi. Vorsicht: Wenn so zurückgesetzt wird, dann wird beim Tastendruck gar nichts gemacht. Das kann aber unewünscht sein, wenn die Taste eine Standardfunktion in Excel hat (z.B. F1 für den Aufruf der Hilfe). Daher das , "" beim Zurücksetzen weglassen um den Standard wiederherzustellen. Gruss, Jogy
! Danke !
Matthias
Hallo Daran hatte ich gar nicht gedacht. Vielen Dank für die Richtigstellung Gruß Matthias
AW: Danke, OK!
rofu
DANKE,OK gruß rofu |
Private Sub Workbook_Open()
Application.OnKey "{DEL}", "los" 'bei Tastaturanschlag Makro zuweisen
End Sub
Sub rst()
Application.OnKey "{DEL}", "" 'zurücksetzen
End Sub
in einem Modul
Sub los()
MsgBox "hurra es klappt"
End Sub
Auf jeden Fall solltest Du die Zuweisung des Makro auf die Entf.Taste wieder zurücksetzen.
Wann Du das machst, ist Dir überlassen.
Am besten natürlich nur auf das entsprechende Blatt beschränken
also beim Activate des Blattes zuweisen
und beim Deaktivate wieder zurücksetzen.
spätestens beim Schließen der Datei zurücksetzen !
Gruß Matthias