Anzeige
Archiv - Navigation
688to692
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
688to692
688to692
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

cmdButton mit Enter aktivieren

cmdButton mit Enter aktivieren
28.10.2005 13:46:32
Metin
Hallo Nepumuk
Ich hatte folgende Zeile eingegeben

Private Sub Eingabe_KeyDown(ByVal KeyCode As MSForms.CommandButton)
If KeyCode = 13 Then cmdEingabe.Activate
End Sub

Es passiert aber nichts. Keine Fehlermeldung garnichts.
Kannst du oder ihr da draussen mir bitte weiterhelfen.
Gruß Metin

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Habe die Lösung
28.10.2005 14:07:33
Metin
Juhuu! Hab´s endlich
Die Lösung lautet

Private Sub cmdEingabe_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 9 Then If GetAsyncKeyState(16) Then txtKabelnummer.Activate Else txtProjektname.Activate
If KeyCode = 13 Then cmdEingabe = True
End Sub

Mit KeyCode 9 anwählen und KeyCode 13 aktivieren.
Gruß Metin
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige