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

Zeilen bis letzte belegte Zeile markieren

Zeilen bis letzte belegte Zeile markieren
20.04.2005 13:40:51
Tini
Hallo!
Ich möchte alle Zeilen bis zur letzten belegten markieren. Ich weiß wie ich die letzte Zeile (in der in Spalte A etwas steht) finden kann.
endup = Range("A65536").End(xlUp).Row
Aber wie baue ich das jetzt hier ein?
Rows(4:?).Select
Über so:
Rows(4:endup).Select
funktioniert es nämlich nicht.
Bitte um dringende Hilfe. Vielen Dank im Voraus.
Gruß Tini

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

Betreff
Datum
Anwender
Anzeige
AW: Zeilen bis letzte belegte Zeile markieren
20.04.2005 14:10:54
R@iner
Hi,
meinst Du so:

Sub markieren()
Dim endup As Integer
endup = Range("A65536").End(xlUp).Row
Range(Cells(4, 1), Cells(endup, 256)).Select
End Sub

Gruß Rainer
AW: Zeilen bis letzte belegte Zeile markieren
20.04.2005 14:12:32
Mac4
Hi Tini,

Sub test()
Dim endup As Long
endup = Range("A65536").End(xlUp).Row
Rows("4:" & endup).Select
End Sub

Marc
AW: Zeilen bis letzte belegte Zeile markieren
20.04.2005 14:18:05
Werner
Hallo Tini
Range("A4").CurrentRegion.Select
Gruss Werner
AW: Zeilen bis letzte belegte Zeile markieren
20.04.2005 14:49:47
Tini
Vielen lieben Dank für die vielen schnellen Beiträge. Hat funktioniert.
Gruß Tini
Anzeige

314 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige