I am working in Excel 97 and have the following code.

Private Sub CalcSchedule_Click()

Dim strCurrentSchedDate As Date
Dim strLookupDate As String
Dim strLookupYesNo As String

Sheets("NON WORKDAY").Select
Application.Rows("10:232").Select
Selection.Sort Key1:=Application.Range("A10"), Order1:=xlAscending,
Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Sheets("Schedule").Select
strCurrentSchedDate = Cells(7, 3).Value
Range("A1").Value = strCurrentSchedDate
Cells(1, 2) = Application.VLookup(strCurrentSchedDate, _
Worksheets("NON WORKDAY").Range("A10:A500"), 2)

End Sub

The problem is that vlookup is returning #N/A. In fact, the date, 01/08/2005
I am looking up, is located in cell A12 on Worksheet "NON WORKDAY". Does
anybody know what could be the problem? I have confirmed, by stepping through
the code, that strCurrentSchedDate contains 01/08/2005.
--
M. Shipp