Excel/VB question

[grierfield]

This is an excel spreadsheet
I want to select data where the "Culture Date" is > – this isent quite working


Private Sub CommandButton1_Click()
With ActiveSheet
If Not .AutoFilterMode Then .[H2].AutoFilter

Range("H2").Select
Selection.AutoFilter
Selection.AutoFilter Field:= 6, Criteria1 is > "12/31/2008"

End With

End Sub

 

[PHV]

What about something like this ?
Selection.AutoFilter Field:=6, Criteria1:=">12/31/2008"

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886