Datum Suchen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
Bild

Betrifft: Datum Suchen
von: Christoph
Geschrieben am: 06.04.2005 12:14:09
Hallo,
ich habe eine Excel Tabelle mit vielen Spalten ( Tag,Datum, Auswahl1,Auswahl2,...).
Nun will ich das aktuelle Datum aus der Datumsspalte raussuchen und in der entsprechenden Zeile weitere Suchen durchführen. Kann mir jemand helfen?
Gruß
Christoph

Bild

Betrifft: AW: Datum Suchen
von: Boris
Geschrieben am: 06.04.2005 12:20:28
Hi Christoph,
ohne Fehlerbehandlung - Datümer in Spalte B (2):
Option Explicit

Sub datum_finden()
Dim C As Range
Set C = Columns(2).Find(Date).EntireRow
MsgBox C.Address
End Sub

Grüße Boris
Bild

Betrifft: AW: Datum Suchen
von: Christoph
Geschrieben am: 06.04.2005 14:03:21
Und wie kann ich dann innerhalb dieser Zeile nach dem Zellwert "F" suchen?
Bild

Betrifft: AW: Datum Suchen
von: Boris
Geschrieben am: 06.04.2005 15:00:56
Hi,
aus der Hand:

Sub datum_finden()
Dim C As Range
Set C = Columns(2).Find(Date).EntireRow
Set C = C.Find("F", lookat:=xlWhole).Address
End Sub

Oder in einer Zeile:

Sub datum_finden()
Dim C As Range
Set C = Columns(2).Find(Date).EntireRow.Find("F", lookat:=xlWhole).Address
End Sub

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Datum Suchen"