Private Sub ListBox3_Click()
Application.ScreenUpdating = False
ListBox4.Clear
Me.TextBox3.Value = Me.ListBox3.Value
Dim NoDupes As Collection
On Error Resume Next
LastCell = Worksheets("Data").Cells(Rows.Count, "F").End(xlUp).Row
With ActiveWorkbook.Worksheets("Data")
.Select
'Set NoDupes = New Collection
    For myrow = 1 To LastCell
    If .Cells(myrow, 6) <> "" And .Cells(myrow, 6).Value <> "DESCRIPTION" Then
   
    If ListBox1.Value = .Cells(myrow, 2).Value And ListBox2.Value = .Cells(myrow, 10).Value _
        And .Cells(myrow, 3).Value = Me.ListBox3.Value Then ' <==== HERE
          ListBox4.AddItem Cells(myrow, 6).Value
          End If
          End If
    Next
End With
Sheets("NAVIGATOR").Activate
Application.ScreenUpdating = True
End Sub
In the highlighted code, i cannot seem to obtain the correct syntax for the dates found in either
.Cells(myrow,3)
and
Me.Listbox3
.

I tried using .Text instead of .Value to no avail.

I think the reason i am not getting the desired result is that the dates are stored as dddd dd mmmm yyyy, yet the listbox is populated in a dd/mm/yy format.

How can i receive a match when there is 2 separate date formats to achive the result above
?