HERBERS Excel-Forum - das Archiv
Thema: Datum Suchen
-
Datum SuchenChristoph
-
AW: Datum SuchenBoris
-
AW: Datum SuchenChristoph
-
AW: Datum SuchenBoris
Datum Suchen
Christoph
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
AW: Datum Suchen
Boris
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
AW: Datum Suchen
Christoph
Und wie kann ich dann innerhalb dieser Zeile nach dem Zellwert "F" suchen?
AW: Datum Suchen
Boris
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
Datum Suchen
Christoph
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
AW: Datum Suchen
Boris
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
AW: Datum Suchen
Christoph
Und wie kann ich dann innerhalb dieser Zeile nach dem Zellwert "F" suchen?
AW: Datum Suchen
Boris
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
Excel-Beispiele