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"