Hallo Leute,
ich suche per .find einen bestimmten Bereich nach einem Suchkriterium ab, Ausgabe in Userform.
Soweit ok.
Leider geht das nicht, wenn der Bereich in dem gesucht werden soll, ausgeblendet ist. Gibt' s da ne einfache Lösung?
With ActiveSheet.Range("O1:AA30")
Set c = .Find(what:=TextBox1.Value, LookIn:=xlValues, lookat:=xlWhole, searchdirection:=xlPrevious)
If Not c Is Nothing Then
Label4 = c.Offset(, 1)
Label5 = Format(c.Offset(0, 2), "hh:mm:ss")
Else
Label4 = "--"
Label5 = "--"
End If
End With
Danke