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

VBA: Zellinhalt als Wer in erste leere Zelle kopieren

Forumthread: VBA: Zellinhalt als Wer in erste leere Zelle kopieren

VBA: Zellinhalt als Wer in erste leere Zelle kopieren
23.08.2024 14:17:14
Fritz_W
Hallo Forumsbesucher,

erneut benoetige ich eure Hilfe. Ich moechte den jeweiligen Inhalt der Zelle E1 kopieren und als Wert in die erste leere Zelle der Spalte L einfuegen.
Fuer eure Unterstuetzung im Voraus besten Dank.

mfg
Fritz
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA: Zellinhalt als Wer in erste leere Zelle kopieren
23.08.2024 16:30:25
ralf_b 
cells(rows.count,"L").end(xlup).offset(1).value = [E1]
AW: VBA: Zellinhalt als Wer in erste leere Zelle kopieren
23.08.2024 16:53:27
Fritz_W
Hallo Ralf,

vielen Dank für deine Hilfe.
Das Makro funktioniert dem Grunde nach wie gewünscht, mit der Einschränkung, dass die Werte in die Spalte L erst ab Zeile 2 eingefügt werden, selbst wenn L1 leer ist.
Grundsätzlich kann ich aber damit leben.

mfg
Fritz
Anzeige
AW: VBA: Zellinhalt als Wer in erste leere Zelle kopieren
23.08.2024 19:30:32
ralf_b
ja das ist so wenn man diesen Fall nicht extra abprüft. Ist aber machbar.
Wenn wir hier jeden möglichen Fall im Code berücksichtigen würden, bliebe nichts zu verbessern für die ambitionierten Hilfesuchenden, die sich selbstverständlich mit VBA befassen um es zu lernen.
AW: VBA: Zellinhalt als Wer in erste leere Zelle kopieren
23.08.2024 19:50:03
Fritz_W
Ralf,
Ich will auf jeden Fall auf Deine Nachricht hin noch einmal klarstellen, dass ich für jede Hilfe dankbar bin und auch versuche, dies jedem Helfer gegenüber zu kommunizieren. Wahrscheinlich muss ich akzeptieren, dass einige Experten nicht verstehen, dass Fragesteller über so wenig Kenntnisse verfügen, was bei mir - zumindest was VBA betrifft - halt der Fall ist.
Noch einmal, Danke für deine Hilfe, aber bitte akzeptiere auch Defizite von uns (dankbaren) Fragestellern.

Mfg
Fritz
Anzeige
AW: VBA: Zellinhalt als Wer in erste leere Zelle kopieren
23.08.2024 20:46:53
Crazy Tom
moin,

mein Vorschlag 

Sub test()

    Dim lngZiel As Long

    lngZiel = Cells(Rows.Count, "L").End(xlUp).Row + 1

    Cells(lngZiel, "L").Value = Range("E1").Value

End Sub


mfg Tom
AW: VBA: Zellinhalt als Wer in erste leere Zelle kopieren
23.08.2024 22:05:24
ralf_b
Nun Fritz, man wird nicht besser, wenn man keinen Ansporn hat. Und genau das ist hier auch ein Antrieb in diesen Foren das man den Hilfesuchenden dabei behilflich ist, sich selbst im Thema zu verbessern. Die letzte belegte bzw. die erste freie Zelle ist gefühlt unter den top 10 der angefragten und gegebenen Lösungen. Also ein Leichtes sowas(selbst) zu recherchieren anstatt es sich leicht zu machen und sich die Lösungen liefern zu lassen. Wir Alle haben mal angefangen. Also verstehe ich die Fragesteller. Ich erwarte aber auch das Fragesteller sich gelegentlich die Hinweise auf den fehlenden eigenen Beitrag an der Lösungsfindung gefallen lassen. Dies ist kein Dienstleistungszentrum auch wenn es immer mehr dazu zu werden scheint.

was deine Frage angeht.
Du kannst prüfen ob die mit dem Cod gefundene letzte Zeile die Nummer 1 hat und ob die leer ist. Dann entsprechend die Zeilennummer oder Zellreferenz mittels offset() setzen. Im Normalfall hat man ja eine Überschrift und erst dann die Daten und der besagte Fall ist dann eher ein Sonderfall.
Anzeige
AW: VBA: Zellinhalt als Wer in erste leere Zelle kopieren
23.08.2024 21:34:30
Fritz_W
Moin Tom
vielen Dank, für deine Unterstützung.
Der Code leistet exakt das gleiche wie der von Ralf.
Ich selbst kann das natürlich nicht nachvollziehen, aber wie erwähnt kann ich damit leben.

mfg
Fritz
AW: VBA: Zellinhalt als Wer in erste leere Zelle kopieren
23.08.2024 22:15:41
Crazy Tom
sorry hatte es anders rum verstanden

das hier wäre ein Weg 

Sub test()

    Dim lngZiel As Long

    lngZiel = Cells(Rows.Count, "L").End(xlUp).Row

    If Cells(lngZiel, "L") = "" Then

        lngZiel = 1

    Else

        lngZiel = lngZiel + 1

    End If

    Cells(lngZiel, "L").Value = Range("E1").Value

End Sub


mfg Tom

PS. ich hoffe ich antworte jetzt auf den richtigen Beitrag
Anzeige
AW: VBA: Zellinhalt als Wer in erste leere Zelle kopieren
24.08.2024 08:45:29
Fritz_W
Hallo Tom,

Perfekt! So beginnt die Auflistung - sofern alle Zellen der Spalte L leer sind - auch in Zelle L1.
Vielen Dank.

mfg
Fritz

Forumthreads zu verwandten Themen

Nicht leere Zellen in einer Zeile finden
Andreas

Hallo Zusammen,
Bisher kam ich ohne VBA zurecht, aber ich denke nun ...
Ich habe eine Tabelle mit folgendem Aufbau
Tabelle1:
ABCDEFG
115789
2__z_z
3zz___
4z__z_
Zeile 1: enthält eine Bezeichnung (hier als Zahl dargestellt)
z=Zahl
_=leer
in einem n...
29.09.2008 14:20:42
Thread-ID: 1013111
5 Beiträge
VBA--Zellen finden/vergleichen/kopieren
Christian

Hallo
einen Beispieldatei ist anbei!!
Bisher konnte ich mit folgendem Code Zellinhalte "täglich" teilen und in neue Zellen kopieren.
Sheets("179").Select Range("B255").End(xlUp).Offset(1, 0).Select ActiveCell.FormulaR1C1 = "=TRIM(LEFT('tägliche Statistik'!R12C6,FIND(""/"",'täglic...
07.10.2008 10:15:00
Thread-ID: 1014634
3 Beiträge
Leere Zelle finden und darüber Kopieren
SebastianSchelb

Hallo, ich habe noch ein Problem.
Tabelle:
Tür(A1)
Fenster(A2)
Haus(A3)
Buch(A5)
Zelt(A6)
Zelle A4 ist leer. Ich will jetzt das er die leere zelle automatisch findet und dann alle darunterbefindlichen Wörter um diese leere zelle nach oben Kopiert. Sollte dann so auss...
07.10.2008 11:28:54
Thread-ID: 1014663
3 Beiträge
Kopieren in erste leere Zelle in aktiver Spalte
Robert

Hallo,
hoffe ihr könnt mir weiterhelfen, denn ich trete voll auf dem Schlauch...
Mein Problem ist, dass ich von Tabelle2 alle gefüllten Zellen der Spalte B ab "B4" kopieren müsste -
und da beginnt mein Problem - es sollte in die aktive Spalte (wird vor Makrostart aktiviert) der Tab...
02.11.2008 08:06:00
Thread-ID: 1021125
3 Beiträge
Anzeige
erste numerische Zelle finden
marcl

Moin zusammen,
ich möchte im gesamten Blatt die erste numerische Zelle finden.
Ich dachte dabei an Find+IsNumeric, komme damit aber nicht weiter. Kann mir jemand helfen?
Danke
Gruß
marcl
05.11.2008 10:37:00
Thread-ID: 1021787
16 Beiträge
Erste und letzte Zelle finden
Frank

Guten morgen,
ich möchte die Zellen finden indem für Start die 06:00 und für Ende die 14:00 steht.
Beispiel:
In der Zelle A100 steht 06:00
In der Zelle A1000 steht 14:00
Wenn die Startzelle und die Endzelle gefunden wurden, dann möchte ich den Zellenbezug in G übernehme und...
18.11.2008 09:38:00
Thread-ID: 1025505
10 Beiträge
Die erste belgte Zelle in Spalte F finden
Kurt

Guten Abend,
ich möchte die 1. belegt Zelle in der Spalte F finden angefangen ab Zeile 3.
Dann möchte ich den Bereich von Spalte A bis Spalte H ab Zeile6 bis zu der 1.
belegten Zelle selectieren unm dann zu kopieren,
gruß mfg Kurt
20.11.2008 20:24:39
Thread-ID: 1026539
8 Beiträge
Anzeige
VBA: Bestimmte Zeichenfolge in Zelle finden
gega

Hallo ich bins nochmals,
ich finde einfach keine Möglichkeit zwei Teile aus dem String herauszulösen, da nur "Käufer: " und "[ Kontakt mit Käufer aufnehmen ]" fest am Anfang und Ende des Strings sind und der Käufername hier "leu_bw_cen" unterschiedlich lang ist und auch die EMail-Adr. zw. d...
23.01.2009 11:52:00
Thread-ID: 1042917
3 Beiträge
vba Leere zellen löschen wenn
Carmen

Hallo liebe Wissenden,
möchte gerne wenn die zellen in Spalte B UND C leer sind dass die gesamte Zeile gelöscht wird, aber vba will keine überlappung.
Sub Leerzeilen_löschen() Range("B1:C100").SpecialCells(xlCellTypeBlanks).EntireRow.delete End Sub
hab das ganze mit if davor und...
06.04.2009 21:26:03
Thread-ID: 1067195
8 Beiträge
erste gefüllte Zelle finden
maart

Hallo,
ich möchte mittels Excel (kein VBA) in einem Bereich die erste gefüllte Zelle finden. Dies soll wie folgend umgesetzt werden:
Bereich A1:E1 beinhaltet eine gefüllte Zelle, bzw. es soll von A1 beginnend die erste gefüllte Zelle gefunden werden. Diese Zelle möchte ich in einer weit...
05.05.2009 19:18:34
Thread-ID: 1073175
4 Beiträge
Anzeige
VBA Zelle finden und einfügen
Einzel

Hallo,
ich hab mal wieder ein kleines VBA Problem
Ich habe in Tabelle 1 unter E3 bis E7 Werte eingetragen.
Nun möchte ich das sie mit einen Code ausgelesen werden und den jeweiliegen Tagen in Tabelle 2 (neben den Tag rechts) eingefügt wird. Und zwar nur der Wert nicht die Formel.
15.07.2009 09:50:12
Thread-ID: 1088685
4 Beiträge
Koordinaten der ersten nicht-leeren Zelle
Hans

Hallo,
ich habe mehrere Listen, die an unterschiedlichen Daten beginnen. Gibt es eine Formel mit der man die Koordinaten der ersten nicht-leeren Zelle einer einzelne Liste ausgeben kann, so dass ich direkt sehe wo diese anfängt?
Danke,
Gruß
18.08.2009 19:31:31
Thread-ID: 1096906
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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