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

Spaltenlänge automatisch herauslesen

Spaltenlänge automatisch herauslesen
20.10.2002 17:37:14
DanielZ
Hi,

ich habe folgendes Problem:

In Spalte A habe ich eine Datumszeitreihe die täglich länger wird. Wie kann ich den Range-Bereich bis auf das aktuelle Datum beschränken. Angenommen, der Bereich wäre gestern mit Range("a1:a100") festgestanden [-> a100=gestriges Datum] so müsste er heute "automatisch" mit Range("a1:a101") festgelegt werden.
Noch ein Hinweis: Der heutige Datumswert ist nicht der letzte Wert in der Spalte!

Vielen Dank für eure Hilfe

Daniel

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Spaltenlänge automatisch herauslesen
20.10.2002 17:56:27
Gábor
Hallo Daniel,

was genau soll denn passieren ? Wozu dient der Bereich ?
Ist das heutige Datum bereits eingetragen, wenn die Festlegung erfolgen soll ?
Dann wäre folgendes Beispiel hilfreich:

Sub Neuer_Bereich()
Dim i As Long, LZeile As Long, NeuerBereich As Range
LZeile = Tabelle1.Cells(Rows.Count, 1).End(xlUp).Row
For i = 1 To LZeile
If Tabelle1.Cells(i, 1).Value = Int(Now) Then
Set NeuerBereich = Tabelle1.Range(Cells(1, 1), Cells(i, 1))
Exit For
End If
Next i
End Sub

Gruß Gábor

Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige