Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1424to1428
1424to1428
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Werte automatisch nach unten füllen

Forumthread: Werte automatisch nach unten füllen

Werte automatisch nach unten füllen
18.05.2015 11:07:07
Erlinghagen
Hallo Forum,
in der Anlage ist eine Tabelle, die im Original meine Daten zeigt und im Ergebnis meine Wunschdarstellung. Das Ergebnis würde ich gerne per Fromel, VBA, wie auch immer hinkriegen.
Kennt jemand eine Lösung?
Der Datensatz enthält bis zu 28.000 Zeilen und ist manuell kaum zu bearbeiten.
Warum mache ich das? Damit ich am Ende über Pivot je Name eine Summe der Stunden erhalten.
Anlage:
https://www.herber.de/bbs/user/97696.xls
Vielen Dank im Voraus!
Benjamin

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Werte automatisch nach unten füllen
18.05.2015 11:32:22
Gerd
Halo Benjamin! 
Sub Fill_It()
Dim Rng As Range, L As Long
On Error Resume Next
Set Rng = Columns(1).SpecialCells(xlCellTypeBlanks)
On Error GoTo ENDE
For L = 1 To Rng.Areas.Count
Rng.Areas(L) = Rng.Areas(L)(0, 1)
Next
ENDE:
If Err.Number  0 Then Err.Clear
End Sub

Gruß Gerd

Anzeige
AW: Werte automatisch nach unten füllen
18.05.2015 12:15:53
Erlinghagen
Funktioniert bestens!!! Vielen Dank!

AW: Werte automatisch nach unten füllen mit Formel
18.05.2015 13:09:33
Daniel
Hi
ohne VBA gehts auch einfach:
1. Spalte A markieren
2. markierung mit Start - Bearbeiten - Suchen und Auwählen - Ihalte - Leerzellen auf die Leerzellen reduzieren
3. in die aktive Zelle (ist die erste leere bei dir A4) die Formel eingeben: =A3 (sinngemäß: "Wert aus Zelle obendrüber") und Eingabe mit STRG+ENTER abschließen.
Die Formel wird dann in alle markierten Zellen übernommen.
4. falls Erwünscht, Spalte A markieren und an gleicher Stelle als Wert einfügen.
so gehts auch mit VBA: 
With Columns(1)
.SpecialCells(xlcelltypeblanks).FormulaR1C1 = "=R[-1]C"
.Formula = .Value
End with

bei sehr grossen Datenmengen kann auch diese Verfahren an seine Grenzen kommen, dann einfach in einer Hilfsspalte (z.B. Spalte C) folgende Formel eintragen und bis ans Datenende kopieren (Formel ab Zeile2):
=Wenn(A2="";C1;A2)
und dann auch wieder kopieren und in Spalte A als Wert eintragen.
das geht auch als Makro und dürfte bei grossen Datenmengen das beste sein, vorallem wenn es viele einzelne Namen sind. 
dim sp as long
dim ze as long
sp = cells.SpecialCells(xlcelltypelastcell).Column + 1
ze = cells.SpecialCells(xlcelltypelastcell).row
With Range(Cells(2, sp), cells(ze, sp))
.FormulaR1c1 = "=IF(RC1="""",R[-1]C,RC1)"
.copy
Cells(2, 1).PasteSpecial xlpastevalues
.ClearContents
End with

Gruß Daniel

Anzeige
AW: Werte automatisch nach unten füllen mit Formel
18.05.2015 13:28:22
Erlinghagen
Der erste Hinweis von Dir Daniel gefällt mir richtig gut!
Besten Dank Euch beiden!
VG

Forumthreads zu verwandten Themen

formatierte Zelle automatisch nach unten schieben
oblivion

Hallo, ich habe eine Frage zu Zellen.
Ich habe sagen wir in L2-L14 Namen stehen. Die Zellen habe ich mit einem Rahmen formatiert. Jetzt kann es aber passieren, dass ich in L15 die Liste weiterführen muss, da ein neuer Name dazugekommen ist. Gibt es eine einfache Möglichkeit, das, wenn ich i...
20.08.2008 17:36:09
Thread-ID: 1003263
5 Beiträge
Anzeige
Spaltenumbruch mit zahlen
Andreas

Salü Zusammen
Dieses Makro zur Einfügung von Seitenumbrüchen habe ich im Archiv gefunden. Kann mir jemand die Angaben mache, damit es anstelle von Buchstaben auch mit Zahlen funktioniert?
Ich möchte, dass sobald die Zahl in Spalte N wechselt ein Seitenumbruch eingefügt wird.
Das wäh...
27.11.2008 13:23:20
Thread-ID: 1028340
2 Beiträge
Zahlen mit . auf Spalten übertragen
ZekA

Hallo,
ich habe in Spalte L Zahlen stehen mit dem Trennzeichen .
Also in Spalte L steht
7 . 3 . 38 . 45 . 43 . 8
Wie bekomm ich mit einer Formel die Zahlen in Spalte B-G
Also Spalte B = 7
Spalte C = 3 usw.
Freu mich auf Hilfe. Danke
Gruß
06.02.2009 11:18:30
Thread-ID: 1047676
3 Beiträge
Zellen automatisch ausfüllen???
Notzm

Hallo Leute!
Hab da ein Problem.....
Ich habe eine Tabelle mit ca. 3000 Zeilen. Davon sind ca 400 in roter Schrift oder teile einer Zeile sind rot.
IN jeder Zeile, in der irgendeine Zelle von A-J in roter Schrift ist, möchte ich in Spalte K jeweils eine 1 eintragen lassen.
Geht...
17.07.2009 11:06:44
Thread-ID: 1089325
5 Beiträge
Zellen nach unten ziehen
welga

Hallo,
ich glaube ich stehe zur Zeit voll auf dem Schlauch.
Ich habe in Spalte A die Zahlen 1 bis 1024. Dann habe ich noch B1=A1, B2=A4, B3=A7, B4=A10. Da es aber zu mühsam ist die einzelnen Zellen in Spalte B von Hand zu füllen, habe ich versucht alle ausgefüllten Zellen zu markieren u...
22.09.2009 11:14:07
Thread-ID: 1104593
3 Beiträge
Zellen automatisch mit Zalen ausfüllen lassen
Rüdiger

Hallo,
ich möchte bei einer Arbeitsmappe, in der ich ein Häkelmuster eingesetzt habe die leeren Kästchen mit fortlaufenden Zahlen füllen lassen. Im Moment mache ich das per Hand!
In der untersten Zeile fängt die Zahl 1 an der rechten Seite anfangen und fortlaufend bis zum nächsten "X" i...
12.11.2009 17:42:37
Thread-ID: 1116623
18 Beiträge
VBA: Zellen vergleichen, Zellen nach unten
Scot

Hallo Leute
Ich hoffe, in diesem Forum eine Lösung für mein Problem zu finden. Bin seit Tagen auf der Suche.
Meine Tabelle sieht so aus, wie die hochgeladene, Blatt "Ausgangslage":
https://www.herber.de/bbs/user/66860.xls
Ziel soll sein, die Spalten B und N ab Zeile 6 Zeile für...
29.12.2009 02:57:17
Thread-ID: 1126145
6 Beiträge
Anzeige
Spalte per Zufall mit Zahlen zwischen 1 -9 füllen
Sebastian

Hallo Leute,
ich brauche ein Makro, das mir in Spalte A1:A10 per Zufall die Zahlen 1-9 füllt. Die Zahlen dürfen nicht doppelt vergeben sein.
Ist sowas möglich. Wenn ja wie?
Vielen Dank für Hilfe
Besten Dank
Sebastian
31.05.2010 17:59:53
Thread-ID: 1159671
11 Beiträge
Anzeige
Zelle nach unten und nächste Spalte analysieren
igoryg

Hallo an alle!
ich habe folgene Formel:
=WENN($D$5="x";ZÄHLENWENN(BL5:BL$21;1); )
Wenn ich diese Zelle einfach nach unten ziehe bekomme ich das da:
=WENN($D$5="x";ZÄHLENWENN(BL6:BL22;1); )
Mein Problem ist, dass ich das haben möchte:
=WENN($D$5="x";ZÄHLENWENN(BM5:BM21;1)...
22.07.2010 16:09:44
Thread-ID: 1168405
3 Beiträge
Anzeige
bestimmte Spalten mit Werten füllen
strodti

Hallo liebe Excelianer,
ich habe in einer Datei zwei Blätter "Eingabe" und "Zuordnungstabelle" mit identischen Spaltenüberschriften. In "Eingabe" werden Adressdaten u.ä. eingetragen. Über untenstehenden Code werden alle Zeilen, die in Spalte A ein "a" haben, in die "Zuordnungstabelle" kopie...
16.11.2010 18:50:54
Thread-ID: 1187050
4 Beiträge
Mehrfachauswahl x+2 Zellen nach unten verschieben
Torsten

Hallo,
ich habe folgendes Problem mit einer Mehrfachauswahl und hoffe auf Hilfe :)
Ich suche in einer Spalte nach einem Textstring, der in unregelmäßigen Abständen vorkommt (Zeile 3, 8, 27, ...). Dadurch bekomme ich eine Mehrfachauswahl, die Daten die ich brauche befinden sich aber exak...
11.08.2011 22:40:09
Thread-ID: 1225711
3 Beiträge
Zellen in Spalten einzeln mit Formeln füllen
Werner

Hallo,
ich habe eine Tabelle (viele Datensätze), die in einigen Spalten mit Matrixformeln berechnet wird. Dementsprechend lange dauert es dann, wenn eine Neuberechnung anbeschubst wird.
Deswegen dachte ich, man könnte die Formeln jeweils nur um eine Zelle nach unten "ziehen" und dann...
11.02.2012 22:24:18
Thread-ID: 1250220
5 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Werte automatisch nach unten füllen in Excel

Schritt-für-Schritt-Anleitung

  1. Spalte markieren: Wähle die Spalte aus, die du mit Werten nach unten ausfüllen möchtest.
  2. Leerzellen auswählen: Gehe zu Start - Bearbeiten - Suchen und Auswählen - Inhalte - Leerzellen. Dies reduziert deine Auswahl auf die Leerzellen in der markierten Spalte.
  3. Formel eingeben: In der aktiven Zelle (die erste leere Zelle) gib die Formel =A3 ein, um den Wert aus der Zelle darüber zu kopieren. Bestätige mit STRG+ENTER. Die Formel wird automatisch in alle markierten Zellen übernommen.
  4. Werte einfügen: Wenn du die Formeln nicht mehr benötigst, kannst du die Spalte markieren und mit Rechtsklick - Inhalte einfügen - Werte die Formeln in feste Werte umwandeln.

Häufige Fehler und Lösungen

  • Fehler: Die Formel wird nicht in alle Zellen übernommen.

    • Lösung: Stelle sicher, dass die Leerzellen korrekt ausgewählt sind. Überprüfe die Schritte zur Auswahl der Leerzellen.

  • Fehler: Die Werte füllen sich nicht bis zum Ende der Spalte.

    • Lösung: Achte darauf, dass du die richtigen Zellen auswählst und die Formel in der ersten leeren Zelle korrekt eingegeben hast.

Alternative Methoden

  • VBA-Makro: Wenn du eine große Datenmenge hast, kann ein Makro hilfreich sein. Hier ist ein einfaches Beispiel:
Sub Fill_It()
    Dim Rng As Range, L As Long
    On Error Resume Next
    Set Rng = Columns(1).SpecialCells(xlCellTypeBlanks)
    On Error GoTo ENDE
    For L = 1 To Rng.Areas.Count
        Rng.Areas(L) = Rng.Areas(L)(0, 1)
    Next
ENDE:
    If Err.Number <> 0 Then Err.Clear
End Sub
  • Wenn-Funktion: Du kannst auch die Formel =WENN(A2="";C1;A2) verwenden, um die Werte nach unten auszufüllen.

Praktische Beispiele

  1. Einfache Werte ausfüllen: Wenn du eine Liste von Namen hast und die Spalte darunter die gleichen Namen wiederholen soll, kannst du die oben genannten Schritte verwenden, um die Namen nach unten auszufüllen.

  2. Mit Zahlen arbeiten: Um eine Spalte mit Zahlen bis zum Ende zu füllen, kannst du die Formel =A2 verwenden, um die Zahl aus der Zelle darüber zu übernehmen.

Tipps für Profis

  • Nutze die Tastenkombinationen für schnellere Eingaben, insbesondere wenn du viele Daten hast.
  • Überlege, VBA-Makros zu verwenden, wenn du regelmäßig große Datenmengen bearbeitest. Das kann dir viel Zeit sparen.
  • Experimentiere mit der Tabelle als Datenquelle für Pivot-Tabellen, um eine Summe automatisch nach unten zu berechnen.

FAQ: Häufige Fragen

1. Wie kann ich Leerzellen in einer großen Tabelle schnell finden?
Verwende die Funktion Suchen und Auswählen - Inhalte - Leerzellen unter dem Tab „Start“, um alle Leerzellen schnell auszuwählen.

2. Kann ich diese Methoden auch in älteren Excel-Versionen verwenden?
Ja, die beschriebenen Methoden funktionieren in den meisten modernen Excel-Versionen, einschließlich Excel 2010 und höher.

3. Wie kann ich sicherstellen, dass meine Formeln immer korrekt nach unten ausgefüllt werden?
Achte darauf, die richtigen Zellen auszuwählen und die Formeln mit STRG+ENTER korrekt einzugeben. Du kannst auch VBA-Makros verwenden, um die Arbeit zu automatisieren.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige