Wie füge ich automatisch eine leere neue Zeile über die Befehlsschaltfläche in Excel ein?
In vielen Fällen müssen Sie möglicherweise eine leere neue Zeile an einer bestimmten Position Ihres Arbeitsblatts einfügen. In diesem Artikel zeigen wir Ihnen, wie Sie automatisch eine leere neue Zeile einfügen, indem Sie in Excel auf eine Befehlsschaltfläche klicken.
Fügen Sie automatisch eine leere neue Zeile über die Befehlsschaltfläche ein
Fügen Sie automatisch eine leere neue Zeile über die Befehlsschaltfläche ein
Sie können den folgenden VBA-Code ausführen, um eine leere neue Zeile einzufügen, indem Sie auf eine Befehlsschaltfläche klicken. Bitte gehen Sie wie folgt vor.
1. Zunächst müssen Sie eine Befehlsschaltfläche einfügen. bitte klicken Entwickler:in / Unternehmen > Insert > Befehlsschaltfläche (ActiveX Control). Siehe Screenshot:
2. Zeichnen Sie dann eine Befehlsschaltfläche in das Arbeitsblatt, das Sie zum Hinzufügen neuer Zeilen benötigen. Klicken Sie mit der rechten Maustaste auf die Befehlsschaltfläche und klicken Sie auf Ferienhäuser aus dem Kontextmenü.
3. In dem Ferienhäuser Geben Sie im Dialogfeld den angezeigten Text der Befehlsschaltfläche in das Feld ein Bildunterschrift Kasten unter dem Kategorisiert Klicken Sie auf die Registerkarte, und schließen Sie das Dialogfeld.
Sie können sehen, dass der angezeigte Text der Befehlsschaltfläche wie im folgenden Screenshot geändert wird.
4. Klicken Sie erneut mit der rechten Maustaste auf die Befehlsschaltfläche, und klicken Sie dann auf Code anzeigen aus dem Kontextmenü.
5. Dann die Microsoft Visual Basic für Applikationen Fenster, bitte ersetzen Sie den Originalcode durch den folgenden VBA-Code in das Code Fenster.
VBA-Code: Fügen Sie automatisch eine leere neue Zeile über die Befehlsschaltfläche ein
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 Sub
Note: Im Code ist CommanButton1 der Name der von Ihnen erstellten Befehlsschaltfläche.
6. Drücken Sie Andere + Q Tasten gleichzeitig zum Schließen der Microsoft Visual Basic für Applikationen Fenster. Und schalten Sie die aus Entwurfsmodus unter dem Entwickler:in / Unternehmen Tab.
7. Klicken Sie auf die eingefügte Befehlsschaltfläche und a Kutools for Excel Das Dialogfeld wird angezeigt. Bitte geben Sie eine bestimmte Zeilennummer ein, unter der Sie eine leere neue Zeile hinzufügen möchten, und klicken Sie dann auf OK Taste. Siehe Screenshot:
Anschließend wird die leere neue Zeile an einer bestimmten Position Ihres Arbeitsblatts eingefügt (siehe Abbildung unten). Und es behält die Zellenformatierung der obigen Zelle bei.
In Verbindung stehende Artikel:
- Wie verwende ich die Befehlsschaltfläche, um ein aktives Arbeitsblatt als PDF-Datei in Excel zu speichern?
- Wie formatiere ich eine Zelle so, dass sie in Excel wie eine 3D-Schaltfläche aussieht?
- Wie kann ich eine Befehlsschaltfläche basierend auf dem angegebenen Zellenwert in Excel ein- oder ausblenden?
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, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!