Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

USB-Taster verwenden

Forumthread: USB-Taster verwenden

USB-Taster verwenden
26.02.2013 15:04:34
Polarfuchs
Hallo Ihr Checker,
was muss ich tun, damit ein USB-Buzzer eine CommandButton betätigt. Wenn ich den Buzzer anschließe, und in Excel in einem Tabellenblatt ein Zelle markiere und den Buzzer betätige, öffnet sich das Fenter "Zellen formatieren". Wenn ich aber in einer UserForm eine CommanButton oder auch eine TextBox bedienen will, passiert nicht.
Danke Polarfuchs

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: USB-Taster verwenden
26.02.2013 15:49:07
Daniel
Hi
erstell mal eine Userform mit Textfeld und einem Label
schreibe ins KeyDown-Event des Textfeldes folgenden Code:
Label1.Caption = "KeyCode: " & KeyCode & " - Shift: " & Shift

dann startest du die Userform, setzt den Cursor in die Textbox und drückst den Buzzer.
im Label sollten jetzt die Codewerte angezeigt werden, die der Druck auf den Buzzer auslöst (bei mir 49 oder 97 für die 1 (Tastatur oder Num-Block) und 2 für STRG)
wenn du die Wert ermittelt hast, änderst du den Code im KeyDown-Event:
If Shift = 2 Then
If KeyCode = 49 or KeyCode = 97 Then
Msgbox "Buzzer"
End if
End If

die Zahlen musst du natürlich entsprechend deiner zuvor ermittelten Werte anpassen.
Gruß Daniel
Anzeige
;

Beliebteste Forumthreads (12 Monate)

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