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

TextBox_KeyDown

Forumthread: TextBox_KeyDown

TextBox_KeyDown
12.01.2017 22:15:05
Thomas
Hallo Excelfreunde,
ich starte mit
Sub TextBox_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
'if KeyDown > 2 then
call macro
'end if
End Sub
ein macro. Nun versuche ich gerade dies ein wenig einzuschränken. So das das Macro erst beim dritten tastenklick ( buchstabe oder Zahl) startet.
weiss jemand rat?
mfg thomas
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: TextBox_KeyDown
12.01.2017 22:51:56
Peter
Hallo Thomas,
um die Anzahl zu behalten, musst du die Variable, in der du das speichern willst in einem Standard-Modul als Public Variable definieren,
Die kannst du dann bei jedem Key Down hochzählen und bei größer 2 wieder auf 0 zurücksetzen.
Gruß Peter
passt besten dank an Peter
12.01.2017 23:24:59
Thomas
Hallo Peter,
es klappt mit 
Sub test ()
intTastenKodeWdhlg = intTastenKodeWdhlg + 1
If intTastenKodeWdhlg > 2 Then
MsgBox " test"
intTastenKodeWdhlg = 0
End If
End Sub

hab recht vielen dank für den tipp.
mfg thomas
Anzeige
AW: TextBox_KeyDown
12.01.2017 23:47:07
littletramp
Hallo Thomas
Da du die Variable nur in einer Prozedur benötigst wäre es besser/sicherer diese in der _ Prozedur selbst mittels Schlüsselwort 

Static
als statisch zu deklarieren.
Hier ein Beispiel. Führe es mehrmals nacheinander aus:
Sub Demo()
Static lngZähler As Long
lngZähler = lngZähler + 1
MsgBox lngZähler
End Sub
Gruss Markus
Anzeige
AW: TextBox_KeyDown
13.01.2017 06:18:42
Thomas
Hallo Marcus,
ich passe dies gleich noch an.
besten dank für auch für diese info davon hatte ich vorher noch gar nichts gehört.
liebe grüsse thomas
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum