Zoeken op datum mbv VBA

[Kim2011]

Wie kan mij helpen?

Ik heb een macro gemaakt met daarin een zoekfunctie (zie onderstaande code). Deze zoekfunctie werkt goed. Maar is het nu ook mogelijk als de zoekfunctie niet gevonden wordt alsnog op een andere datum te zoeken? Ik heb meerdere dingen geprobeerd, maar zonder resultaat.

    Dim strDatum As String
    Dim c As Range

    With xlw.Sheets("Aantal").Range("A2:Z50")
    Set c = .Find(strDatum, LookIn:=xlValues, LookAt:=xlWhole)
        If Not c Is Nothing Then
    
    Else

 

[VenA]

Plaats even een excel voorbeeldje of de volledige code.

 

[Kim2011]

Ik weet niet hoe maar het is gelukt. Het kwam volgens mij doordat de datum niet als datum stond.