Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
332to336
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
332to336
332to336
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

nicht Zeile 65536 sondern -letzte leere Zeile-

nicht Zeile 65536 sondern -letzte leere Zeile-
05.11.2003 13:12:27
Peter
Wer hilft?
Eigendlich sollte der Wert in der letzten leeren Zeile
stehen und nicht in der letzten Zeile.
Sollte noch eine Schleife notwendig sein sollte die Zeilenüberprüfung
von unten nach oben erfolgen. Doch wie?

~begin~
'################################################
'leider landet die Eingabe in Zeile 65536

Range(Cells(Rows.Count, 1), Cells(Rows.Count, 5)).Value = rng.Value

'################################################
~end~
Danke im voraus
Peter

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: nicht Zeile 65536 sondern -letzte leere Zeile-
05.11.2003 13:19:23
Willie
Versuch es mal so!
Y = Cells(Rows.Count, 1).End(xlUp).Offset(0, 1).Row + 1
Z = Cells(Rows.Count, 5).End(xlUp).Offset(0, 1).Row + 1
Range(Cells(Y, 1), Cells(Z, 5)).Value = rng.Value


Gruß

Willie
AW: nicht Zeile 65536 sondern -letzte leere Zeile-
05.11.2003 13:20:05
PeterW
Hallo Peter,

die erste freie Zelle in Spalte A ermittelst du mit
lgSpalteA = Range("A65536").End(xlUp).Row + 1

Gruß
Peter
AW: nicht Zeile 65536 sondern -letzte leere Zeile-
05.11.2003 13:22:05
Mac4
So müsste es gehen:

Range(Cells(Cells(Rows.Count, 1).End(xlUp).Row + 1, 1), Cells(Cells(Rows.Count, 1).End(xlUp).Row + 1, 5)).Value = mg.Value

Marc

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige