Wie wechselt man nach der Eingabe automatisch zur nächsten Zelle in Excel?
In diesem Artikel zeige ich Ihnen praktische Tricks, wie Sie den Cursor automatisch zur nächsten Zelle bewegen können, um Sequenznummern einzugeben – ganz ohne Enter-Taste in Excel.
Automatisches Ausfüllen einer 4-stelligen Reihe mit Kutools für Excel 
Automatischer Wechsel zur nächsten Die Zelle rechts nach Eingabe einer 4-stelligen Zahl ohne Drücken der Enter-Taste mithilfe von VBA
Hier ist ein VBA-Code, der Ihnen automatisch in die Zelle rechts wechselt, sobald Sie eine vierstellige Zahl eingegeben haben – ganz ohne Enter-Taste.
1. Drücken Sie Alt + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden VBA-Code in das Modul-Skript ein. Siehe Screenshot:
VBA: Automatischer Wechsel zur nächsten Zelle rechts nach Eingabe einer vierstelligen Zahl.
Sub FourCharEntry1()
'UpdatebyExtendoffice20160614
Dim xStr As String
Dim I As Integer
Dim K As Integer
xStr = Application.InputBox("Enter string", "Kutools for Excel", , , , , , 2)
K = 0
Application.ScreenUpdating = False
For I = 1 To Len(xStr) Step 4
ActiveCell.Offset(0, K) = "'" & Mid(xStr, I, 4)
K = K + 1
Next
Application.ScreenUpdating = True
End Sub
3. Drücken Sie die F5-Taste, um den Code auszuführen. Anschließend erscheint ein Kutools für Excel-Dialogfeld, in dem Sie aufeinanderfolgende Zahlen ohne Trennzeichen eingeben können. Siehe Screenshot:
4. Klicken Sie auf OK. Jetzt wurde jede Gruppe aus vier Ziffern von links nach rechts in eine einzelne Zelle eingefügt.
Tipp: Wenn Sie fünfstellige, sechsstellige … Zahlen in eine Zelle eingeben möchten, ändern Sie einfach die 4 im Code auf 5, 6 oder einen anderen Wert.
Automatisches Ausfüllen einer 4-stelligen Reihe mit Kutools für Excel
Mit Kutools für Excel – einem praktischen Werkzeug – fügen Sie fortlaufende Nummern mühelos in einen Bereich ein, ohne die Enter-Taste drücken zu müssen – ganz einfach mit dem Sequenznummer einfügen-Werkzeug.
Nachdem Sie Kutools für Excel kostenlos installiert haben, gehen Sie wie folgt vor:
1. Wählen Sie eine Spalte oder Zeile aus, die Sie mit einer Zahlenreihe füllen möchten, und klicken Sie auf Kutools > Einfügen > Sequenznummer einfügen. Siehe Screenshot:
2. Klicken Sie im Sequenznummer einfügen-Dialogfeld auf Neu, um das Dialogfeld zu erweitern. Siehe Screenshot:
3. Geben Sie anschließend die gewünschte Reihe an – siehe Screenshot:
4. Klicken Sie auf Hinzufügen > Bereich ausfüllen, dann wird der ausgewählte Bereich automatisch mit aufeinanderfolgenden Zahlen gefüllt.
Tipp: Mit dem Sequenznummer einfügen-Werkzeug können Sie auch wiederholte Reihen einfügen. Aktivieren Sie im Dialogfeld die Option Endnummer, geben Sie die gewünschte Endnummer in das rechte Textfeld ein, und die Reihenzahlen werden anschließend alle 10 Zahlen wiederholt eingefügt. Siehe Screenshot:
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins