Wie fügt man mithilfe einer Befehlsschaltfläche automatisch eine neue leere Zeile in Excel ein?
In vielen Fällen möchten Sie möglicherweise eine neue leere Zeile an einer bestimmten Position Ihres Arbeitsblatts einfügen. In diesem Artikel zeigen wir Ihnen, wie Sie mit einem Klick auf eine Befehlsschaltfläche automatisch eine neue leere Zeile in Excel einfügen.
Automatisches Einfügen einer neuen leeren Zeile mithilfe einer Befehlsschaltfläche
Automatisches Einfügen einer neuen leeren Zeile mithilfe einer Befehlsschaltfläche
Führen Sie den folgenden VBA-Code aus, um beim Klicken auf eine Befehlsschaltfläche eine neue leere Zeile einzufügen – so geht’s:
1. Fügen Sie zunächst eine Befehlsschaltfläche ein. Klicken Sie dazu auf Entwickler > Einfügen > Befehlsschaltfläche (ActiveX-Steuerelement). Siehe Screenshot:
2. Zeichnen Sie anschließend eine Befehlsschaltfläche in das Arbeitsblatt, in dem Sie neue Zeilen hinzufügen möchten. Klicken Sie mit der rechten Maustaste auf die Schaltfläche und wählen Sie im Kontextmenü Eigenschaften.
3. Geben Sie im Dialogfeld Eigenschaften den gewünschten Anzeigetext der Befehlsschaltfläche in das Feld Beschriftung unter der Registerkarte Kategorisiert ein und schließen Sie dann das Dialogfeld.
Sie sehen, dass sich der Anzeigetext der Befehlsschaltfläche wie im folgenden Screenshot gezeigt hat.
4. Klicken Sie erneut mit der rechten Maustaste auf die Befehlsschaltfläche und wählen Sie im Kontextmenü Code anzeigen.
5. Ersetzen Sie im Fenster Microsoft Visual Basic für Applikationen den ursprünglichen Code im Code-Fenster durch den folgenden VBA-Code.
VBA-Code: Automatisches Einfügen einer neuen leeren Zeile mithilfe einer Befehlsschaltfläche
Private Sub CommandButton1_Click()
Dim rowNum As Integer
On Error Resume Next
rowNum = Application.InputBox(Prompt:="Enter Row Number where you want to add a row:", _
Title:="Kutools for excel", Type:=1)
Rows(rowNum & ":" & rowNum).Insert Shift:=xlDown
End SubHinweis: Im Code steht „CommandButton1“ für den Namen der Befehlsschaltfläche, die Sie erstellt haben.
6. Drücken Sie gleichzeitig die Tasten Alt + Q, um das Fenster Microsoft Visual Basic für Applikationen zu schließen. Deaktivieren Sie anschließend den Entwurfsmodus unter der Registerkarte Entwickler.
7. Klicken Sie auf die eingefügte Befehlsschaltfläche. Daraufhin erscheint ein Kutools für Excel-Dialogfeld. Geben Sie die Zeilennummer ein, an der Sie eine neue leere Zeile einfügen möchten, und klicken Sie auf die Schaltfläche OK. Siehe Screenshot:
Anschließend wird die neue leere Zeile an der angegebenen Position Ihres Arbeitsblatts eingefügt – wie im folgenden Screenshot veranschaulicht – und übernimmt dabei automatisch die Formatierung der darüberliegenden Zelle.
Entfesseln Sie die Magie von Excel mit KUTOOLS AI
- Intelligente Ausführung: Führen Sie Zelloperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles ganz einfach per Sprachbefehl.
- Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe optimal zu optimieren.
- VBA-Programmierung: Schreiben und implementieren Sie VBA-Code ganz mühelos.
- Formelinterpretation: Verstehen Sie komplexe Formeln spielend leicht.
- Textübersetzung: Überwinden Sie Sprachbarrieren direkt in Ihren Tabellenkalkulationen.
Verwandte Artikel:
- Wie verwendet man eine Befehlsschaltfläche, um das aktive Arbeitsblatt als PDF-Datei in Excel zu speichern?
- Wie formatiert man eine Zelle, damit sie in Excel wie eine 3D-Schaltfläche aussieht?
- Wie blendet man eine Befehlsschaltfläche in Excel basierend auf einem bestimmten Zellwert ein oder aus?
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