using string

[alarants]

Strange phenomenon I am ecperiencing. When I am doing:

Jumber = "4000"
ActiveSheet.Range("$C$7:$C$" & (numberofrows - 7)).AutoFilter Field:=i, Criteria1:=Array("4010", _
Jumber), Operator:=xlFilterValues
Everything is ok, but if I am doing

Number = 4000
Jumber = CStr(Number)
ActiveSheet.Range("$C$7:$C$" & (numberofrows - 7)).AutoFilter Field:=i, Criteria1:=Array("4010", _
Jumber), Operator:=xlFilterValues
It gives me "Auto filter method of Range class failed"
Can anybody help?