ich versuche gerade krampfhaft ein Makro zu erstellen, mit dem automatisch der Zellinhalt der gerade aktiven Zelle in der Tabelle gesucht wird.
Ich habe versucht, dieses mit dem Makrorecorder zu verwirklichen:
Sub Zellinhalt_suchen()
' Zellinhalt_suchen Makro
' Tastenkombination: Strg+s
Selection.Copy
Cells.Find(What:="1", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False) _
.Activate
End Sub
Leider sucht er jetzt nicht den aktiven Zellinhalt, sondern immer die Zahl 1, da diese bei der Recorderaufzeichnung zufällig in der aktiven Zelle stand.
Weiß vielleicht jemand, wie dieser VBA-Code abzuändern ist ?
Grüße Stephan