Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
224to228
224to228
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Letzte aktive Zeile in einem definierten Bereich

Letzte aktive Zeile in einem definierten Bereich
03.03.2003 12:30:44
Ralf S.
Hallo Excelperten!

folgendes Makro kopiert aus einer fixen Zeile Werte oder Formeln in die jeweils nächste freie Zeile.

Dim laR As Long
laR = Cells(Rows.Count, 1).End(xlUp).Row
Cells(12, 1).Copy Destination:=Cells(laR + 1, 1)
Cells(laR + 1, 2) = Cells(11, 2)
Cells(laR + 1, 3) = Cells(11, 3)
Cells(laR + 1, 4) = Cells(11, 4)
Cells(laR + 1, 5) = Cells(11, 5)
Cells(11, 6).Copy Destination:=Cells(laR + 1, 6)

Problem 1:
In Zeile 42 möchte ich eine beliebige markierte Zeile der Liste darstellen.

Problem 2:
Wenn (1) funktioniert ist ja Zeile 42 letzte gefüllte Zeile und mein obiges Makro kopiert absofort in Zeile 43, 44, 45 etc.
Wie kann ich das verhindern?

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Vielen Dank!
05.03.2003 10:29:19
Ralf S.

Hallo Hans,

Danke für Deine Lösung!
Heute früh bin ich selbst auf eine Lösung gekommen:

i = ActiveCell.Row
Rows(i).Select
Rows(42) = Selection.Value

Aber Deine Lösung passt noch besser, weil sie in "Echtzeit" funktioniert!

Gruß Ralf

Anzeige

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige