Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Neue Zeile am Ende einfügen

Neue Zeile am Ende einfügen
21.01.2018 15:31:48
Florian
Hallo zusammen,
ich habe ein Problem mit Excel 2010.
Ich bin beruflich Feuerwehrmann und möchte in Excel für unseren Einsatzleitwagen ein Einsatzstellenprotokoll schreiben. Das Protokoll ist in den ersten 4 Zeilen eingeforeren. (Hier befinden sich lediglich Überschrift / Name / Name Einsatzleiter / Datum..)
Nun kommt meine eigentliche Liste.
Hier soll in der Spalte 1 Uhrzeit eingefügt werden.
Spalte 2 zeigt verfügt über ein Dropdown Menü in dem man auswählen kann wer die Rückmeldung gegeben hat.
In Spalte 3 kann Freitext eingegeben werden
In Spalte 4 wird wieder über ein Dropdown Menü ausgewählt, wer es eingetragen hat. Nun möchte ich nicht einfach 40 Zeilen vorher einfügen sondern der Standard ist 1 Zeile zum eintragen sieht man. Benötige ich eine weitere möchte dies über ein Button [Neue Zeile] verwirklichen.
Leider gelingt es mir nicht, das die Zeile immer unter der zuletzt geschrieben Zeile eingefügt wird. Ich möchte gerne das dies so geschieht, damit man wenn man sich die Datei ausdruckt den zeitliche Verlauf von Oben nach Unten durchlesen.
Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Neue Zeile am Ende einfügen
21.01.2018 15:35:52
Hajo_Zi
wähle Zelle A1,. Strg und Pfeil nach unten und nochmal Pfeil nach unten und Du bist in der leeren Zeile.

Ich gebe keinen Dank für eine Rückmeldung, da ich durch solche Beiträge nicht meine Beitragszahl erhöhen muss.
Also ich schreibe keine Beiträge mit dem Betreff "Gerne u. Danke für die Rückmeldung....."
Rückmeldung ist ja in der Heutigen Zeit nicht üblich und die wenigen die eine Rückmeldung geben,
mögen mir das verzeihen, das kein Danke für eine Rückmeldung kommt.
Beiträge von Werner, Luc, robert und folgende lese ich nicht.
Anzeige
AW: Neue Zeile am Ende einfügen
21.01.2018 15:52:02
Florian
Ich habe es nun hinbekomme das er mir die Zeile einfügt. Jedoch kopiert er die Zeile unendlich oft nebeneinander bis Spalte XFD.
Kann ich definieren das dies nur einmal kopiert werden soll?
AW: Neue Zeile am Ende einfügen
21.01.2018 15:56:51
Hajo_Zi
Du solltest nach kopieren nur die Zelle in Spalte A wählen.
Gruß Hajo
Anzeige
AW: Neue Zeile am Ende einfügen
21.01.2018 15:44:52
Florian
Leider habe ich noch das Problem. Ich möchte die Zeile die eingefügt werden soll mit den gleichen Dropdownlisten haben. Wenn ich diese vorher markiere und kopiere und dann mit STRG + Pfeil nach unten arbeite kopiert er mir das vorher ausgefüllte mit. Es soll aber leer kopiert werden.
AW: Neue Zeile am Ende einfügen
21.01.2018 16:14:50
Werner
Hallo Florian,
da würde ich nicht auf irgendeine Schaltfläche setzen. Ich würde da das Doppelklick-Ereignis des Tabellenblattes benutzen
Folgenden Code ins Codemodul des Tabellenblattes. Dazu
-Rechtsklick auf den Tabellenblattreiter - Code anzeigen - Code rechts ins Codefenster kopieren
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Application.ScreenUpdating = False
If Target.Column = 1 And Target.Row > 4 Then
If Cells(Target.Row, 1)  "" Then
Cancel = True
Rows(Target.Row).Copy
Rows(Target.Row + 1).Insert
Rows(Target.Row + 1).ClearContents
End If
End If
Application.ScreenUpdating = True
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 And Target.Row > 4 Then
If Cells(Target.Row, 3)  "" Then
Target.Offset(0, -2) = Now
Else
Target.Offset(0, -2) = ""
End If
End If
End Sub
Wenn du eine Auswahl in deiner Dorpdownliste in Spalte C/D triffst, dann wird die Uhrzeit eingetragen. Wird der Eintrag wieder gelöscht, dann wird auch die Uhrzeit wieder entfernt.
Sobald eine Uhrzeit eingetragen ist, kannst du durch einen Doppelklick in Spalte A/B (auf den vorhandenen Uhrzeiteintrag) eine neue Zeile einfügen.
Gruß Werner
Anzeige
AW: Neue Zeile am Ende einfügen
21.01.2018 16:17:36
Florian
Das ist eine sehr coole Idee vielen Dank!
Er zeigt mir aber nun das Datum und die Uhrzeit kann. Was muss ich im Code ändern damit er mir nur die Uhrzeit einfügt?
AW: Neue Zeile am Ende einfügen
21.01.2018 16:25:26
Werner
Hallo Florian,
erst mal noch ne kleine Änderung im Change Code. Bei der Vorgängerversion ändert sich die Uhrzeit, wenn du z.B. feststellst, dass du im Doropdown etwas falsches gewählt hast und die Auswahl dann änderst. Beim jetzigen Code passiert das nicht.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 And Target.Row > 4 Then
If Cells(Target.Row, 3)  "" Then
If Cells(Target.Row, 1) = "" Then
Target.Offset(0, -2) = Now
End If
Else
Target.Offset(0, -2) = ""
End If
End If
End Sub
Will dir ja nicht zu Nahe treten, aber bei Excel gut könnte man auf die Idee kommen die Spalten A/B im entsprechenden Uhrzeitformat zu formatieren.;-D
Gruß Werner
Anzeige
AW: Neue Zeile am Ende einfügen
21.01.2018 16:28:04
Florian
Hallo Werner,
alles gut, ich nehme das immer sehr sportlich. ;)
Das es so leicht ist hätte ich jetzt nicht gedacht ^^"
Ich teste jetzt mal die neue Version und melde mich gleich nochmal ob alles funktioniert.
AW: Neue Zeile am Ende einfügen
21.01.2018 16:42:10
Florian
Hallo Werner,
vielen dank!! Funktioniert super mit dieser Lösung.
Eine Frage noch an dich, wieso würdest du das nicht über ein "Button" lösen? Für mich ist es so super leicht, aber bei uns gibt es auch einige Kollegen für die es evtl. leichter wäre einfach auf den Button "neue Zeile" zu klicken.
Ich danke dir schon einmal vielmals
Anzeige
AW: Neue Zeile am Ende einfügen
21.01.2018 17:11:22
Werner
Hallo Florian,
weil ich es einfach für komfortabler halte. Der Butto müsste bei deiner Tabelle im oberen, fixierten Bereich sein. Warum soll ich also mit der Maus aus der Zelle/Zeile raus um auf einen Button zu klicken, der dann in dem Bereich, in dem ich mich vorher befunden habe, eine Aktion auszuführen. Da bleib ich doch lieber gleich da wo ich mich sowieso schon befinde und klicke zweimal.
Wenn die Benutzer der Tabelle damit überfordert sind, dann gib ihnen einen Kugelschreiber und ein Blatt Papier.
Gruß Werner
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Infobox / Tutorial

Neue Zeile am Ende einfügen in Excel


Schritt-für-Schritt-Anleitung

Um in Excel eine neue Zeile am Ende deiner Liste einzufügen, kannst du die folgende Vorgehensweise nutzen. Diese Anleitung bezieht sich auf Excel 2010, aber die Prinzipien gelten auch für neuere Versionen.

  1. Öffne dein Excel-Dokument und navigiere zu dem Tabellenblatt, in dem du die neue Zeile einfügen möchtest.

  2. Wähle die letzte Zeile deiner Liste aus. Du kannst dies tun, indem du die Zelle in der ersten Spalte (Spalte A) der letzten ausgefüllten Zeile auswählst und dann die Tastenkombination Strg + Pfeil nach unten verwendest, um zur nächsten leeren Zeile zu gelangen.

  3. Verwende die VBA-Programmierung, um eine neue Zeile hinzuzufügen. Gehe dazu auf den Reiter „Entwicklertools“ und klicke auf „Visual Basic“. Füge dann den folgenden Code in das entsprechende Codemodul ein:

    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
       Application.ScreenUpdating = False
       If Target.Column = 1 And Target.Row > 4 Then
           If Cells(Target.Row, 1) <> "" Then
               Cancel = True
               Rows(Target.Row).Copy
               Rows(Target.Row + 1).Insert
               Rows(Target.Row + 1).ClearContents
           End If
       End If
       Application.ScreenUpdating = True
    End Sub
  4. Schließe den VBA-Editor und gehe zurück zu deinem Excel-Blatt. Jetzt kannst du durch einen Doppelklick auf eine Zelle in Spalte A (ab Zeile 5) eine neue Zeile einfügen.


Häufige Fehler und Lösungen

  • Problem: Die neue Zeile wird unendlich oft kopiert.

    • Lösung: Stelle sicher, dass du nur die Zelle in der ersten Spalte (Spalte A) auswählst, bevor du die Zeile einfügst.
  • Problem: Die eingefügte Zeile hat bereits Inhalte.

    • Lösung: Achte darauf, dass die ClearContents-Methode im VBA-Code korrekt implementiert ist, um die neue Zeile leer zu lassen.
  • Problem: Du möchtest eine neue Zeile mit den gleichen Dropdownlisten erstellen.

    • Lösung: Stelle sicher, dass du nur die Struktur der Zeile kopierst, nicht die Inhalte oder Dropdowns. Dies kannst du leicht anpassen, indem du die Copy-Methode entsprechend veränderst.

Alternative Methoden

Eine andere Möglichkeit, eine neue Zeile am Ende einzufügen, besteht darin, eine Excel-Formel zu verwenden, die eine unendliche Liste nach unten erstellt. Du kannst die OFFSET-Funktion nutzen, um automatisch auf die nächste leere Zeile zuzugreifen.

Eine sehr einfache Methode ist auch, die Zeile über das Kontextmenü einzufügen:

  1. Klicke mit der rechten Maustaste auf die Zeilennummer unterhalb der letzten Zeile.
  2. Wähle „Zeile einfügen“ aus dem Kontextmenü.

Praktische Beispiele

Angenommen, du hast eine Liste von Einsätzen in deinem Protokoll und möchtest jeden neuen Einsatz in einer neuen Zeile festhalten.

  • Beispiel 1: Du hast die folgenden Spalten: Uhrzeit, Rückmeldung, Kommentar, Eingetragen von.
  • Wenn du nun einen neuen Einsatz hinzufügen möchtest, klicke einfach auf die letzte Zeile in Spalte A und führe einen Doppelklick aus. Eine neue Zeile wird automatisch eingefügt.

Tipps für Profis

  • Verwende VBA, um mehr Funktionalität hinzuzufügen: Du kannst den VBA-Code erweitern, um mehr Logik zu integrieren, wie z.B. das automatische Einfügen von Zeitstempeln oder spezifischen Werten.
  • Formatierung: Achte darauf, die Formatierung der Zellen zu überprüfen, damit die neuen Zeilen das gleiche Layout wie die bestehenden Zeilen haben.
  • Schaltflächen erstellen: Du kannst auch eine Schaltfläche „Neue Zeile“ hinzufügen, die denselben VBA-Code ausführt, wenn sie angeklickt wird. Dies ist eine benutzerfreundliche Option für weniger erfahrene Excel-Nutzer.

FAQ: Häufige Fragen

1. Frage
Wie kann ich sicherstellen, dass die neue Zeile immer unter der letzten ausgefüllten Zeile eingefügt wird?
Antwort: Der VBA-Code stellt sicher, dass die neue Zeile immer unter der zuletzt ausgefüllten Zeile eingefügt wird, indem er nach dem letzten Eintrag in Spalte A sucht.

2. Frage
Kann ich den VBA-Code anpassen, um spezifische Werte in der neuen Zeile einzufügen?
Antwort: Ja, du kannst den Code anpassen, um spezifische Werte oder Formeln in die neuen Zeilen einzufügen, indem du die entsprechenden Zellen im Code definierst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige