Ein Datum ohne Jahresangabe suchen
05.12.2007 14:36:00
edie
in der Spalte B wird das gleiche Datum aus der Zelle AI3 im
Format (TT.MM.JJ) gesucht.
Dabei kann das Jahr immer wiede unterschiedlich sein, deshalb möchte
ich gerne nur nach Tag und Monat suchen, hier der Code-Schnippsel:
Sub Beispiel()
Dim rng As Range
Application.ScreenUpdating = False
Set rng = Columns(2).Find( _
What:=Cells(3, 35), lookat:=xlWhole, LookIn:=xlFormulas)
If rng Is Nothing Then
Beep
MsgBox "Datum wurde nicht gefunden!"
Exit Sub
End If
rng.Offset(0, 3).Select
Application.ScreenUpdating = True
End Sub
Wie sucht bzw. findet man nur ein Teil vom Datum d.h. TT.MM?
Mit Lef und Len, ader wie ist die Syntax?
Kann jemand helfen?
Vielen Dank im Voraus.
Grüße
Anzeige