I have an excel sheet with dates column 1 and a number value in column 2. For
example:

6/5/06 1
6/6/06 7
6/5/06 1
6/6/06 7
6/7/06 7
6/5/06 1

basically i want excel to look down column 1 find a specific date, look to
the right for the value and call a different sub according to the value..the
problem im having is getting excel to search the everything on the list.
Right now if it finds one instance of the specified date it stops, i want it
to continue down the list, and find all instances of the specified date.
heres what i have of the code so far.

With Worksheets("Sheet1").Range("A1:A10")
Set C = .Find(What:=Date + 10)
Set found = C

If C Is Nothing Then
x = 1
End If

If x = 1 Then
MsgBox ("dont have to send email")

End If

If x = 0 Then
MsgBox ("have to send email")

If found.Offset(columnoffset:=1).Value = "7" Then
MsgBox (found)
A = 1
Call Group1


If found.Offset(columnoffset:=1).Value = "1" Then
MsgBox ("o")
B = 1
Call Group2
End If
End If

End If
End With