none
VBA - Tastaturabfrage RRS feed

  • Frage

  • Wie kann ich im VBA mit dem "Application.OnKey"-Befehl die "5" auf der numerischen Tastatur abfragen?

    Für die "1", z.B., sieht es so aus:

    Application.OnKey "{END}", "mein_Makro"

    Dienstag, 20. März 2012 15:33

Antworten

  • Hallo JeJaTy

    JeJaTy wrote:

    Wie kann ich im VBA mit dem "Application.OnKey"-Befehl die "5" auf der
    numerischen Tastatur abfragen?

    Für die "1", z.B., sieht es so aus:

    Application.OnKey "{END}", "mein_Makro"

    Das hängt davon ab, ob NumLock aktiv ist oder nicht. Du kannst den Tastatur
    Scancode direkt in geschweiften Klammern verwenden. Hier eine Liste der
    Scancodes des Numerischen Tastatur Blockes:

    Num. Tast./     NumLock  NumLock
    Beschriftung    aus      ein
    ------------    -------  -------
     0 Ins           45       96
     1 End           35       97
     2 Down          40       98
     3 PgDn          34       99
     4 Left          37      100
     5               12      101
     6 Right         39      102
     7 Home          36      103
     8 Up            38      104
     9 PgUp          33      105

    In Deinem Fall wäre also für die 5 auf dem numerischen Block {12}, rsp.
    {101} zu benutzen, abhängig davon, ob NumLock eingeschaltet ist oder nicht.

    HTH

    Henry

    Mittwoch, 21. März 2012 02:50

Alle Antworten