Datum finden in Zeile
08.08.2018 09:02:51
Andreas
vielleicht kann mit einer bei meinem Thema weiter helfen.
Ich suche in einer Zeile nach einem Datum das in einer anderen Zelle steht per Makro.
Die Daten stehen in der Zeile 90° gedreht um Platz zu sparen.
Mit meinem kurzen Skript möchte ich nun nach dem Referenz Datum aus Celle K5 suchen.
Das Makro lauft aber nicht durch da er das Datum angeblich nicht findet.
Wenn ich nun das Datum so formatiere, das es das gleiche Format hat wir das Referenz Datum aus _
Celle K5, dann findet er das aber auch nur, wenn die Zelle auch die breite hat das das Datum _
dargestellt wird. Wenn es zu schmal ist, findet das Makro es auch nicht.
Sub Datumfinden()
Dim rngDatum As Range
Set rngDatum = Range("M3:AQY3").Find(Range("K5"))
If Not rngDatum Is Nothing Then
rngDatum.Select
Else
MsgBox "Das Datum " & Range("K5") & " ist nicht zu finden."
End If
Set rngDatum = Nothing
End Sub
Vielen Dnak schon mal im voraus für eure Unterstützung.
Grüße
Andi