erweiterung möglich?
06.02.2016 17:37:01
Thomas
ich habe eine userform in der ich mit dem
Set rngSearch = .Range("B:J").Find(What:=txtSearch, After:=.Range("B65536")) sehr schnell eine tabelle durchsuchen kann.
Leider kommt es nun vor das ich auch nach Datumswerte suchen muss.
Habe schon herausgefunden das es womöglich mit
Dim Datum
Datum = txtSearch
Set rngSearch = .Range("B:J").Find(What:=CDate(Datum), After:=.Range("B65536"))
gehen könnte . Nur ich weiss einfach nicht wie ich es hinbekommen könnte das nach beidem gesucht wird.
Vielleicht suche nach What:=txtSearch wenn nichts gefunden dann nach (What:=CDate(Datum)
Dieser What:=CDate(Datum) and What:=txtSearch versuch ist auch irgendwie nicht gewinn bringend
Kann sich dies mal jemand anschauen
liebe grüsse thomas