cell.find in einer bestimmten Spalte
11.11.2013 09:36:19
Albert
ich gebrauche den Code-Schnipsel um zuerst das Datum, dann einen Namen zu finden.
Das Datum bekomme ich noch hin, denn es gibt mir eine Spalte vor.
Aber mit dem Namen hängt es aus, denn der soll in der vorgegebenen Spalte gesucht werden.
Sub suche()
With ZSVerwaltung
Cells.Find(What:=CDate(.TextBox3.Text), After:=ActiveCell, LookIn:=xlFormulas, _
lookat:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Cells.Find(What:=CDate(.Listbox1.value), After:=ActiveCell.column, LookIn:=xlFormulas, _
lookat:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
End with
End Sub
Vielen lieben Dank schon jetzt vorab.
Gruß
A.