Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1372to1376
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

täglichen Wert koopieren und einfügen

täglichen Wert koopieren und einfügen
06.08.2014 09:47:39
Lupo
Hallo
wieder mal ich mit dem heutigen Problem.
Ich will einen Code, das In Blatt 2 die Werte von I8 bis L8 kopiert,
und im Blatt 1 in der Spalte B in die erste leere Zeile einträgt.
Info: in der Spalte A ist das Datum bis 2016 schon ausgefüllt, deshalb
ab der leeren Spalte B.
Danke lg

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

Betreff
Datum
Anwender
Anzeige
AW: täglichen Wert koopieren und einfügen
06.08.2014 09:52:03
Hajo_Zi

Sub Kopie()
Dim LoLetzte As Long
With Worksheets("Blatt1")
LoLetzte = IIf(IsEmpty(.Cells(.Rows.Count, 2)), .Cells(Rows.Count, 21).End(xlUp).Row, . _
Rows.Count)
Worksheets("Blatt2").Range("I8:L8").Copy .Cells(LoLetzte, 2)
End With
End Sub

AW: täglichen Wert koopieren und einfügen
06.08.2014 10:25:01
Lupo
Leider wird der Wert immer nur auf der ersten Zeile eingefügt.
Ich meinte, Wert in Blatt 2 wie beschrieben kopieren und
im Blatt1, Spalte B einfügen, wenn in der z.b. Zeile 844 in der Spalte B nichts mehr steht.
Es würde auch funktionieren, wenn der kopierte Wert in der Zeile ab Spalte B
eingefürt würde, wenn das heutige Datum mit diesem in der Spalte A zusammen passt.
Ich hoffe, das ist halbwegs nachvollziebar.
Danke

Anzeige
AW: täglichen Wert koopieren und einfügen
06.08.2014 10:39:32
Christian
Hallo Lupo,
da ist ein Tippfehler dringewesesen:
LoLetzte = IIf(IsEmpty(.Cells(.Rows.Count, 2)), .Cells(Rows.Count, 2).End(xlUp).Row, .Rows.Count)

MfG Christian

AW: täglichen Wert koopieren und einfügen
06.08.2014 12:07:10
Lupo
Super und danke, habe hinten noch +1 dazugesetzt und funktioniert.
Danke wieder vielmals

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige