Live-Forum - Die aktuellen Beiträge
Datum
Titel
27.09.2025 15:11:53
Probleme mit dem Autovervollständigen
27.09.2025 13:16:54
Mit VBA erstellter S.-Brief erzeugt mehr Briefe als Daten
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
984to988
984to988
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

onkey-methode während codeausführung

Forumthread: onkey-methode während codeausführung

onkey-methode während codeausführung
18.06.2008 14:59:20
rich
mit der onkey-methode will ich die cursor-buttons abfragen und eine prozedur starten
ich hab festgestellt, dass diese abfrage nicht funktioniert, wenn code in einer schleife ausgeführt wird
ist das ein bekannter umstand, oder kenn ich einen trick o.ä. nicht?
danke

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: onkey-methode während codeausführung
18.06.2008 15:04:00
Matthias
Hallo Rich,
schreib' mal

DoEvents


in die Schleife.
Gruß Matthias

AW: onkey-methode während codeausführung
18.06.2008 15:27:05
rich
danke für die schnelle antwort, bin aber leider noch nicht zur lösung meines problems gekommen.
vorab eine frage:
reicht es, einmal mittels onkey-methode einer taste eine prozedur zuzuweisen, um diese dann mittels dieser taste, egal wo ich mich in meinem code (evtl. andere prozedur) befinde, auch mehrmals, aufzurufen?
hintergrund zu meinem problem: ich will eine aktion in bestimmten zeitabschnitten (ms-bereich) wiederholen
eingesetzt habe ich dafür, die funktion gettickcount, die ich immer wieder abfrage und entsprechend bei ablauf der zeit eine variable setze, die meine besagte aktion freigibt.
in dieser schleife (sprünge in andere prozeduren vorhanden) will ich die cursortasten abfragen um eine variable zu setzten.
Die onkey-methode mit setzen der variable außerhalb der schleife ist gestestet und funktioniert
ich hab das doevents in meine schleife gepackt, leider ohne erfolg.
wer kann mir helfen?
danke

Anzeige
AW: onkey-methode während codeausführung
18.06.2008 21:21:00
Josef
Hallo Rich,
das geht so nicht, dazu musst du die Tastatur abfragen
Option Explicit

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Const VK_KEYA = &H41 'A key
Const VK_KEYB = &H42 'B key
Const VK_KEYC = &H43 'C key

Sub Tastenabfrage()
Dim datNow As Date

datNow = Now + TimeSerial(0, 0, 30)

Do
    
    If GetAsyncKeyState(VK_KEYA) = -32768 Then
        MsgBox "A-Taste gedrückt"
    ElseIf GetAsyncKeyState(VK_KEYB) = -32768 Then
        MsgBox "B-Taste gedrückt"
    ElseIf GetAsyncKeyState(VK_KEYC) = -32768 Then
        MsgBox "C-Taste gedrückt"
    End If
    
Loop While datNow > Now

End Sub


Gruß Sepp



Anzeige
AW: onkey-methode während codeausführung
19.06.2008 13:51:09
rich
so funktioniert es - danke
;

Forumthreads zu verwandten Themen

OnKey in UserForm
selli

hallo liebe leute,
ich stehe vor einem problem, für dass ich zwar im forum eine lösung gefunden habe, jedoch scheint mir diese für meine anwendung recht aufwendig zu sein und hoffe, mir kann jemand einen einfacheren weg aufzeigen.
ich möchte in einer userform, die viele steuerelemente e...
02.10.2008 14:48:00
Thread-ID: 1013893
6 Beiträge
OnKey bei Userform
Reinhard

Hallo Wissende,
für eine UF als Taschenrechnernachbau will ich die Rechnertasten mit CommandButtons nachbauen.
Z.B. für den CB mit der Caption "+" will ich es so einrichten, daß das Drücken der tastaturtaste "+" dem Klick auf dem CB entspricht.
Desgleichen für die Entertaste und den...
21.01.2009 18:05:19
Thread-ID: 1042341
15 Beiträge
OnKey
MBorn

Hallo,
kann mir bitte jemand erklären, warum bei
Private Sub Workbook_Open() Application.OnKey "{F1}", "ModulnameXYZ" End Sub
in "Diese Arbeitsmappe"
nicht das Modul ModulnameXYZ aufgerufen wird?
Danke,
Born
18.06.2009 16:20:18
Thread-ID: 1082677
9 Beiträge
Per ".OnAction" und ".OnKey" Nebeninformation
Martin

Hallo liebe Excelgemeinde,
ich würde gerne eine Nebeninformation beim Aufruf eines Makros übergeben:
Sub Makro1(Info as Integer) Msgbox Info End Sub
Leider klappt das weder per .OnKey noch per .OnAction:
Sub Test1() Application.OnKey "{F5}", "Makro1(1)" End Sub Sub Test2()...
01.07.2009 15:53:27
Thread-ID: 1085772
3 Beiträge
Frage zu Application.OnKey
Matthias

Hallo Excelfreunde
kann man Application.OnKey nicht mit den Ziffern 0 bis 9 der Tastatur belegen ?

Folgender Code funktioniert einwandfrei:
Tabelle1 Private Sub Worksheet_Activate() Application.OnKey "^{F1}", "MyProcedur1" Application.OnKey "^{F2}", "MyProcedur2" Application.On...
18.07.2009 18:55:41
Thread-ID: 1089677
4 Beiträge
Anzeige
Application.OnKey - Kombinationsmöglichkeiten
Peter

Guten Tag
Was gibt es alles für Tastenkombinationen, denen ich mittels Application.OnKey Befehle zuweisen kann?
Gruss, Peter
22.07.2009 08:00:40
Thread-ID: 1090376
3 Beiträge
OnKey
Max

Hallo,ich möchte einer Tastenkombination eine bestimmte Funktionalität zuweisen. Mit 'OnKey' funktioniert das auch.Meine Frage wäre nun, ob ich der Funktion die ich dann aufrufe Parameter mitgeben kann?Bsp.:
Private Sub Workbook_Open()
'hier soll an die sub 'Message' ein Parameter übergeb...
26.04.2002 10:42:54
Thread-ID: 116537
6 Beiträge
Anzeige
Application OnKey
Wilhelm R.

Liebes Forum,
mit folgendem wird ein Makroaufruf auf die Enter Taste im Ziffernblock gelegt, gleichzeitig soll dann aber die normale Return Taste inaktiv sein:
Sub auto_open()
''legt die Überprüfung der Eingabe in Spalte D auf "Return" im Ziffernblock
Application.OnKey "{ENTER}", "S...
10.05.2002 09:37:53
Thread-ID: 119885
3 Beiträge
Onkey + [Alt]-Taste in Excel 2010
Axel

Hallo alle miteinander,
erstmal einen schönen Gruss an alle und Gratulation zum tollen Forum. Ich stöbere seit Stunden in sämtlichen Internet-Foren komme aber auf keinen grünen Zweig für mein folgendes Problem:
Ich portiere gerade VBA-Anwendungen von Excel 2003 nach Excel 2010. Unter an...
14.09.2010 07:39:58
Thread-ID: 1177044
2 Beiträge
onkey
Elke

Hallo,
kurze Frage an die Excel-VBA-Gemeinde. Wenn ich mit Application.Onkey im VBA Code die Escapetaste während der Programmausführung aussschalten möchte, dachte ich es wäre einfach mit: Sub MeinBeispielOnKey() Application.OnKey "{ESC}", "" ' Esc ausschalten For t = 1 To 20000...
31.03.2011 14:55:24
Thread-ID: 1208524
9 Beiträge
OnKey mit mehreren Tasten (String mitgeben)
Jürgen

Hallo Zusammen,
ich möchte bei bestimmen Buchstaben eine Prozedur starten, und dann den Buchstaben ausführen lassen.
Nun kann ich doch Prozeduren einmal erstellen und die Variable beim Aufruf übergeben.
Geht das auch mit Onkey?
Meine Prozedur starten eine Art Überprüfung und trä...
04.04.2011 16:14:05
Thread-ID: 1208943
4 Beiträge
Onkey für Mausklick
Hartmut_M

Hallo,
gibt es eigentlich eine Möglichkeit den Mausklick mit Onkey abzufragen?
Ähnlich wie die Enter Taste: Application.OnKey "{ENTER}"
Danke für die Unterstützung.
Hartmut
04.08.2011 17:03:40
Thread-ID: 1224923
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige