Anzeige
Archiv - Navigation
1300to1304
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

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

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

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige