khalid79m
03-16-2010, 03:42 PM
Private Sub XXXX()
Dim a As String
Dim b As String
zRow = ThisWorkbook.Sheets("Input_Data_level1").Cells(Cells.Rows.Count, "A").End(xlUp).Row
ThisWorkbook.Sheets("Input_Data_Level1").AutoFilterMode = False
a = ThisWorkbook.Sheets("Reporting").Range("D5").Value
b = ThisWorkbook.Sheets("Reporting").Range("D6").Value
ThisWorkbook.Sheets("Input_Data_Level1").Range("A1:D" & zRow).AutoFilter Field:=1, Criteria1:= _
">=" & a, Operator:=xlAnd, Criteria2:="<=" & b
End Sub
Hi in this code
a = 12/03/2010 (12th March 2010)
b = 15/03/2010 (15th March 2010)
however the filter shows 03/12/2010 and 03/12/2010 ?
why why why ? can anyone help.
Dim a As String
Dim b As String
zRow = ThisWorkbook.Sheets("Input_Data_level1").Cells(Cells.Rows.Count, "A").End(xlUp).Row
ThisWorkbook.Sheets("Input_Data_Level1").AutoFilterMode = False
a = ThisWorkbook.Sheets("Reporting").Range("D5").Value
b = ThisWorkbook.Sheets("Reporting").Range("D6").Value
ThisWorkbook.Sheets("Input_Data_Level1").Range("A1:D" & zRow).AutoFilter Field:=1, Criteria1:= _
">=" & a, Operator:=xlAnd, Criteria2:="<=" & b
End Sub
Hi in this code
a = 12/03/2010 (12th March 2010)
b = 15/03/2010 (15th March 2010)
however the filter shows 03/12/2010 and 03/12/2010 ?
why why why ? can anyone help.