VBA filter

[GosiaHali]

Hi, I have a question: I want to filter the data in tabel, however my code doesnt work, could you help me how to fix it:

Private Sub Makro()
Dim t As Integer
t = InputBox("Number: ")
Cells.Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$E$11").AutoFilter Field:=5, Criteria1:=">t", _
Operator:=xlAnd

End Sub

[mdmackillop]

Syntax error in your criteria.


Private Sub Makro()
Dim t As Integer
t = InputBox("Number: ")
ActiveSheet.Range("$A$1:$E$11").AutoFilter Field:=5, Criteria1:=">" & t
End Sub

[GosiaHali]

Still shows nothing after filtering, seems like it doesnt read t as a value

[GosiaHali]

ok it works now !!! thank you !