Visual Basic - Error 9 tiempo ejecucion Subindice fuera de intervalo

Saludos!
No soy programador
Estoy realizando un filtro a una hoja de excell, atravez de cuadro de texto y botones de opciones de filtro y borrado. A continuacion pongo el código

Private Sub BORRAR_FILTRO_Click()
CUADRO_TEXTO_DESCRIPCION = Empty
End Sub

Private Sub BOTON_OPCION_CONTIENE_Click()
Call CUADRO_TEXTO_DESCRIPCION_Change
End Sub

Private Sub BOTON_OPCION_EMPIEZA_Click()
Call CUADRO_TEXTO_DESCRIPCION_Change
End Sub

Private Sub CUADRO_TEXTO_DESCRIPCION_Change()

If BOTON_OPCION_EMPIEZA Then
ListObjects("T_BDD").Range.AutoFilter Field:=5, Criterial:=Range("F7") & "*"
Else
ListObjects("T_BDD").Range.AutoFilter Field:=5, Criterial:="*" & Range("F7") & "*"
End If
End Sub

pero me sale el error Error 9 tiempo ejecucion Subindice fuera de intervalo.


Alguna recomendación?

Gracias y saludos!!

Recomendamos que adjuntes tu hoja de Excel para revisar el funcionamiento y lo que tratas de haces para sugerir alguna solución.