Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
376to380
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
376to380
376to380
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Formulierung Rangebereich (bis Zeilenende)

Formulierung Rangebereich (bis Zeilenende)
04.02.2004 07:58:09
Peter
Hallo Forum,
ich möchte den Rangebereich so definieren, dass er bis zur
letzten Zeile in Spalte 8 geht.
Wie schreibt man das?
Hab schon mal probiert, komm aber nicht klar.
Danke Peter
Range("A4:H63").Value '< neue Formulierung: Range("A4:????????").Value
LzBestOrg = Cells(Rows.Count, 8).End(xlUp).Row

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

Betreff
Datum
Anwender
Anzeige
AW: Formulierung Rangebereich (bis Zeilenende)
04.02.2004 08:09:56
Dirk
Hallo.
Meiner Einbildung nach müsste das so funktionieren:

Sub neu()
LzBestOrg = Cells(Rows.Count, 8).End(xlUp).Row
Range(Cells(4, 1), Cells(LzBestOrg , 8)).Select
End Sub

Statt dem Select halt das was Du damit willst.
Cheers
Danke für die Rückmeldung :-(
04.02.2004 09:42:27
Dirk
AW: Formulierung Rangebereich (bis Zeilenende)
04.02.2004 08:10:34
Galenzo
Hallo Peter,
du bist schon ziemlich nah dran!
Probier mal dies:
Dim Bereich As Range
Set Bereich = Range([a4],Cells(Cells(Rows.Count, 8).End(xlUp).Row, 8))
''' Bereich.Select
mfg
Anzeige

308 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige