Hi

I am using Excel 2003 and what to do a custom filter on a date range through
VBA.

I am using the code below but when I look at the sheet no data is displayed
if I look at the custom filter option on the field the setting are there and
if I click on OK the data will then display. It is like the custom filter
through the code is not be executed / refreshed but the criteria is going
into the correct place.

Sub DateFilter()
vFilter = Range("DateAssigned").Value
vFilter2 = Range("DateAssigned2").Value
Sheets("DCR").Select
Selection.AutoFilter Field:=2, Criteria1:="=" & Format(vFilter,
"dd/mm/yyyy"), Operator:= _
xlAnd, Criteria2:="<=" & Format(vFilter2, "dd/mm/yyyy")
End sub

Thanks
Ailish

Hi.
Change your formats to "mm/dd/yyyy", whatever the displayed format.
HTH
Daniel

Hi

I am using Excel 2003 and what to do a custom filter on a date range through
VBA.

I am using the code below but when I look at the sheet no data is displayed
if I look at the custom filter option on the field the setting are there and
if I click on OK the data will then display. It is like the custom filter
through the code is not be executed / refreshed but the criteria is going
into the correct place.

Sub DateFilter()
vFilter = Range("DateAssigned").Value
vFilter2 = Range("DateAssigned2").Value
Sheets("DCR").Select
Selection.AutoFilter Field:=2, Criteria1:="=" & Format(vFilter,
"dd/mm/yyyy"), Operator:= _
xlAnd, Criteria2:="<=" & Format(vFilter2, "dd/mm/yyyy")
End sub

Thanks
Ailish

Hi Daniel

I have the format on the criteria areas as I am in Ireland the dd/mm/yyyy
format is ok but should I be putting it somewhere else as well?

Thanks

"Daniel.C" wrote:

Hi.
Change your formats to "mm/dd/yyyy", whatever the displayed format.
HTH
Daniel

Hi

I am using Excel 2003 and what to do a custom filter on a date range through
VBA.

I am using the code below but when I look at the sheet no data is displayed
if I look at the custom filter option on the field the setting are there and
if I click on OK the data will then display. It is like the custom filter
through the code is not be executed / refreshed but the criteria is going
into the correct place.

Sub DateFilter()
vFilter = Range("DateAssigned").Value
vFilter2 = Range("DateAssigned2").Value
Sheets("DCR").Select
Selection.AutoFilter Field:=2, Criteria1:="=" & Format(vFilter,
"dd/mm/yyyy"), Operator:= _
xlAnd, Criteria2:="<=" & Format(vFilter2, "dd/mm/yyyy")
End sub

Thanks
Ailish

Hi Daniel

Sorry misunderstood and change the setting to mm/dd/yyyy and it worked
perfectly.

thanks

"Ailish" wrote:

Hi Daniel

I have the format on the criteria areas as I am in Ireland the dd/mm/yyyy
format is ok but should I be putting it somewhere else as well?

Thanks

"Daniel.C" wrote:

Hi.
Change your formats to "mm/dd/yyyy", whatever the displayed format.
HTH
Daniel

Hi

I am using Excel 2003 and what to do a custom filter on a date range through
VBA.

I am using the code below but when I look at the sheet no data is displayed
if I look at the custom filter option on the field the setting are there and
if I click on OK the data will then display. It is like the custom filter
through the code is not be executed / refreshed but the criteria is going
into the correct place.

Sub DateFilter()
vFilter = Range("DateAssigned").Value
vFilter2 = Range("DateAssigned2").Value
Sheets("DCR").Select
Selection.AutoFilter Field:=2, Criteria1:="=" & Format(vFilter,
"dd/mm/yyyy"), Operator:= _
xlAnd, Criteria2:="<=" & Format(vFilter2, "dd/mm/yyyy")
End sub

Thanks
Ailish