Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Neue Zeile automatisch einfügen

Neue Zeile automatisch einfügen
berkeweb
Hallo Zusammen,
ich arbeite gerade an einer Liste und würde gerne eine Funktion verwenden, die automatisch eine neue Zeile einfügt, wenn ich in eine Zelle einen Wert eintrage.
Beispiel:
Ich schreibe einen Wert z.B. "1.000" in die Zelle A8. Dann soll Excel mir automatisch darunter eine neue Zeile einfügen, die die selbe Formatierung (Rahmen, Zahlenformate, etc.) besitzt wie die Zellen in Zeile 8.
Hat jemand eine Idee, wie man sowas in Excel realisieren kann? Benötigt man hierzu VBA?
Beste Grüße und frohe Ostertage.
Axel
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Neue Zeile automatisch einfügen
02.04.2010 18:46:15
robert
hi,
wieso zeile einfügen?
formatier die spalte A so wie du sie brauchst, dann ist jede eingabe in A so formatiert.
oder meinst du etwas anderes?
gruß
robert
AW: Neue Zeile automatisch einfügen
02.04.2010 18:55:37
berkeweb
Hallo Robert,
ich möchte, dass Excel, sobald ein Wert in eine Zelle eingetragen wird (z.B. Zelle A8) automatisch darunter eine neue Zeile einfügt und dabei sämtliche Formatierungen aus der darüberliegenden Zeile übernimmt.
Beste Grüße
Axel
Anzeige
ich versteh dich nicht,...
02.04.2010 19:02:44
robert
hi,
excel hat doch genug zeilen, wieso eine einfügen?
wir reden aneinander vorbei, scheint mir......
hast du schon die spalte A formatiert?
gruß
robert
AW: ich versteh dich nicht,...
02.04.2010 19:17:33
Daniel
Hi
eine ganze Spalte mit einem Zellformat wie Rahmen oder Farbe zu versehen ist idR eine schlechte Idee, weil Excel dann z.B. beim Drucken nicht mehr automatisch erkennt, wo das Blatt eigentlich zu Ende ist, sondern den ganzen Formatlierten Zellbereich als benutzen Bereich nimmt.
Die Frage ist eher, wann genau die Zeile eingefügt werden soll.
Soll die Tabelle immer nur am unteren Ende erweitert werden oder soll auch, wenn der Anwender mitten in der Tabelle einen Wert eingibt, an dieser Stelle eine neue Zeile eingefügt werden.
Gruß, Daniel
Anzeige
AW: ich versteh dich nicht,...
02.04.2010 19:51:39
berkeweb
Hallo Robert, hallo Daniel,
@ Robert: Es geht mir darum, dass sich eine Tabelle immer um eine Zeile automatisch erweitert, wenn die letzte Zeile der Tabelle befüllt wird. Und bei dieser automatischen Erweiterung soll Excel die Formate mit übertragen.
@ Daniel: Berechtigte Frage. Die Tabelle soll immer nur am unteren Ende erweitert werden. Mitten drin ist dies nicht notwendig.
Ich habe Euch ein Beispiel eingefügt. Im Reiter "April_2009" ist die Zeile 10 aktuell leer und so formatiert, wie ich es benötige. Wenn ich nun die Zeile 10 befülle, möchte ich, dass Excel mit darunter eine neue Zeile generiert, die genauso aussieht wie die aktuelle unbefüllte Zeile 10.
https://www.herber.de/bbs/user/68930.xls
Beste Grüße
Axel
Anzeige
AW: ich versteh dich nicht,...
02.04.2010 21:38:17
Daniel
Hi
das geht in Excel über die Option "Datenbereichsformate erweitern", allerdings nur dann, wenn man eine neue Zeile anfängt, dann werden für diese Zeile die Formate übernommen.
Einstellen kann man das im Startmenü - Exceloptionen - Erweitert.
damit das Funktioniert, müssen ein paar Bedingungen erfüllt sein, dh die Liste muss als Liste erkennbar sein (Liste ist von den anderen Tabelleninhalten durch umlaufende Leerzellen abgesetzt, eine Zeile Überschrift, durch Formatierung abgesetzt und mindestens 5 Zeilen lang).
hier die Beschreibung aus der Hilfe:
Datenbereichsformate und -formeln erweitern  Durch Auswählen werden neue Elemente, die dem Ende einer Liste hinzugefügt werden, automatisch formatiert, damit sie mit dem Format der restlichen Liste übereinstimmen. Formeln, die in jeder Zeile wiederholt werden, werden ebenfalls kopiert. Für die Erweiterung müssen Formate und Formeln in mindestens drei der fünf letzten Zeilen enthalten sein, die der neuen Zeile vorangehen.
Gruß, Daniel
Anzeige
Bedingte Formatierung..
03.04.2010 14:34:16
robert
hi,
zB. so:
Bed.Format-Formel: =wenn($A11)>2
und formate die du willst( zahl, fett, rahmen usw..)
gruß
robert
Wohl doch ohne WENN und Klammern... FrOst owT
03.04.2010 16:28:43
Luc:-?
:-?
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Automatisches Einfügen von neuen Zeilen in Excel


Schritt-für-Schritt-Anleitung

Um in Excel automatisch eine neue Zeile einzufügen, wenn du einen Wert in eine Zelle eingibst, kannst du die folgende VBA-Makro-Lösung verwenden:

  1. Öffne dein Excel-Dokument und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Füge ein neues Modul hinzu:

    • Klicke im Menü auf Einfügen > Modul.
  3. Kopiere den folgenden Code in das Modul:

    Private Sub Worksheet_Change(ByVal Target As Range)
       Dim newRow As Long
    
       ' Überprüfen, ob die Änderung in Spalte A erfolgt ist
       If Not Intersect(Target, Me.Columns("A")) Is Nothing Then
           If Target.Value <> "" Then
               newRow = Target.Row + 1
    
               ' Neue Zeile unterhalb einfügen
               Me.Rows(newRow).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
               ' Formatierung der neuen Zeile übernehmen
               Me.Rows(Target.Row).Copy
               Me.Rows(newRow).PasteSpecial Paste:=xlPasteFormats
               Application.CutCopyMode = False
           End If
       End If
    End Sub
  4. Speichere deine Änderungen und schließe den VBA-Editor.

  5. Teste die Funktion: Gib einen Wert in eine Zelle der Spalte A ein. Eine neue Zeile sollte automatisch darunter eingefügt werden.


Häufige Fehler und Lösungen

  • Fehler: "Excel kann keine neuen Zeilen einfügen."

    • Lösung: Stelle sicher, dass du nicht in einer geschützten Arbeitsmappe arbeitest. Entferne den Schutz, um neue Zeilen hinzuzufügen.
  • Fehler: "Die neue Zeile erhält nicht die gewünschte Formatierung."

    • Lösung: Überprüfe den VBA-Code, insbesondere den Teil, der die Formatierung kopiert. Stelle sicher, dass die Zeile, aus der die Formatierung übernommen werden soll, korrekt angegeben ist.

Alternative Methoden

Falls du kein VBA verwenden möchtest, kannst du auch die Funktion "Datenbereichsformate erweitern" nutzen:

  1. Formatierung anpassen:
    • Gehe zu Start > Format > Datenbereichsformate erweitern.
  2. Bedingungen beachten:
    • Deine Tabelle muss die Kriterien für die automatische Formatierung erfüllen, wie z.B. eine Überschrift und umlaufende Leerzeilen.

Praktische Beispiele

  • Beispiel zur automatischen Zeilenübertragung: Wenn du in Zelle A8 den Wert "1.000" eingibst, wird direkt unterhalb in Zeile 9 eine neue Zeile hinzugefügt, die das gleiche Format hat wie Zeile 8.

  • Verwendung in einer Tabelle: Wenn du eine Excel-Tabelle (nicht nur einen Datenbereich) verwendest, kannst du auch die Funktion Excel automatisch neue Zeilen einfügen, wenn du am Ende der Tabelle Werte eingibst.


Tipps für Profis

  • Automatisierung mit VBA: Nutze VBA, um die Funktionalität weiter anzupassen, z.B. indem du Bedingungen hinzufügst, wann genau eine neue Zeile eingefügt werden soll.

  • Verwendung der Formel: Du kannst auch eine Formel verwenden, die automatisch in die nächste Zeile übernommen wird, um die Handhabung zu erleichtern. Dies kann durch Anpassung des VBA-Codes geschehen.


FAQ: Häufige Fragen

1. Wie kann ich die automatische Zeile in einer spezifischen Spalte einfügen?
Du kannst die Intersect-Funktion im VBA-Code anpassen, um eine andere Spalte zu prüfen, z.B. If Not Intersect(Target, Me.Columns("B")) Is Nothing Then.

2. Funktioniert das bei allen Excel-Versionen?
Ja, die beschriebenen Methoden sollten in den meisten aktuellen Excel-Versionen funktionieren, die VBA unterstützen (z.B. Excel 2013 und neuer).

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige