Olá

Coloquei o seguinte Código para filtrar no Excel - tabela atraves de uma textbox

Private Sub txtFILTRO_Change()
If txtFILTRO.Value <> "" Then
Selection.AutoFilter field:=2, Criteria1:="*" & Me.txtFILTRO.Text & "*"
Else
Selection.AutoFilter field:=2
End If
End Sub

Esta a dar erro ao digitar qualquer letra na textbox, marca a linha Selection.AutoFilter field:=2, Criteria1:="*" & Me.txtFILTRO.Text & "*"

Qual o meu erro ? Obrigado