kann mir jemand die SendKeys Bezeichnungen für die Tab- und Entertaste veraten?
Danke!
MFG, Wolle
VG,
Alex
probier mal für enter
Application.SendKeys ("~")"
und für tab musst du glaube ich TAB in geschwungene klammern setzen
:-) jörg
RÜCKTASTE {BACKSPACE}, {BS} oder {BKSP}
PAUSE {BREAK}
FESTSTELLTASTE {CAPSLOCK}
ENTF {DELETE} oder {DEL}
NACH-UNTEN {DOWN}
ENDE {END}
EINGABETASTE {ENTER}oder ~
ESC {ESC}
HILFE {HELP}
POS 1 {HOME}
EINFG {INSERT} oder {INS}
NACH-LINKS {LEFT}
NUM-FESTSTELL {NUMLOCK}
BILD-AB {PGDN}
BILD-AUF {PGUP}
DRUCK {PRTSC}
NACH-RECHTS {RIGHT}
ROLLEN-FESTSTELL {SCROLLLOCK}
TAB {TAB}
NACH-OBEN {UP}
F1 {F1}
F2 {F2}
F3 {F3}
F4 {F4}
F5 {F5}
F6 {F6}
F7 {F7}
F8 {F8}
F9 {F9}
F10 {F10}
F11 {F11}
F12 {F12}
F13 {F13}
F14 {F14}
F15 {F15}
F16 {F16}
Sie können Tastenkombinationen mit der UMSCHALTTASTE, STRG-TASTE oder ALT-TASTE angeben, indem Sie vor dem normalen Tasten-Code einen oder mehrere der folgenden Codes angeben:
Taste Code
UMSCHALT +
STRG ^
ALT %
MFG, Wolle
MFG, Wolle
Um die Tasten TAB und Enter in Excel VBA zu simulieren, kannst du die SendKeys-Methode verwenden. Hier ist eine einfache Anleitung:
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
Füge ein neues Modul ein, indem du auf Einfügen > Modul klickst.
Schreibe den folgenden Code, um die Tasten TAB und Enter zu senden:
Sub SendKeysExample()
Application.SendKeys "{TAB}"
Application.SendKeys "{ENTER}"
End SubFühre das Makro aus, um die Tasten zu simulieren.
Du kannst auch die SendKeys-Befehle anpassen:
Application.SendKeys "~"Application.SendKeys "{TAB}"Problem: SendKeys funktioniert nicht.
SendKeys an das aktive Fenster sendet.Problem: SendKeys sendet nicht die erwartete Taste.
"{ENTER}" oder "~" und für TAB "{TAB}".Wenn SendKeys in deinem Fall nicht funktioniert, gibt es alternative Methoden, um ähnliche Ergebnisse zu erzielen:
Verwendung von Application.OnTime: Du kannst zeitgesteuerte Aktionen programmieren, um bestimmte Aufgaben zu automatisieren.
Direkte Zellbearbeitung: Anstatt Tasten zu simulieren, kannst du Werte direkt in Zellen eingeben, um die Interaktion zu vermeiden.
Hier sind einige Beispiele, wie du SendKeys in verschiedenen Szenarien verwenden kannst:
Daten eingeben und zur nächsten Zelle wechseln:
Sub EnterDataAndMove()
Range("A1").Value = "Test"
Application.SendKeys "{TAB}"
End SubFormularfeld ausfüllen und absenden:
Sub FillForm()
Application.SendKeys "Mein Name"
Application.SendKeys "{TAB}"
Application.SendKeys "{ENTER}"
End SubVerzögere SendKeys: Füge Application.Wait hinzu, um Verzögerungen einzubauen, die sicherstellen, dass die Tastenanschläge richtig verarbeitet werden. Beispiel:
Application.Wait Now + TimeValue("00:00:01") ' 1 Sekunde wartenVerwende DoEvents: Dies hilft, die Benutzeroberfläche reaktionsfähig zu halten, während SendKeys aktiv ist.
1. Wie kann ich SendKeys für andere Tasten verwenden?
Du kannst die entsprechenden Codes für andere Tasten verwenden, z.B. {ESC} für die Escape-Taste oder {LEFT} für die linke Pfeiltaste.
2. Warum funktioniert SendKeys manchmal nicht?
SendKeys kann unzuverlässig sein, wenn andere Fenster im Vordergrund sind oder wenn das aktive Fenster nicht bereit ist, Tastenanschläge zu empfangen. Achte darauf, dass dein Excel-Fenster aktiv ist.