Hola, buen día

Me encuentro adelantando un proyecto con filtro avanzado pero al momento de darle dos veces click a un boton el cual le he asignado una macro para que me quite los filtros, éste, al darle dos veces me aparece el siguiente mensaje:

Error 1004 en tiempo de ejecución
Error en el metodo ShowAllData de la clase WorkSheet

Este es el ódigo VBA:

Sub Quitar_filtro()
'
' Quitar_filtro Macro
'

'
    ActiveSheet.ShowAllData
    Range("B9").Select
    Range(Selection, Selection.End(xlToRight)).Select
    Selection.ClearContents
    Range("B9").Select
End Sub


Cúal es el problema?
Agradecería mucho de tu ayuda Feliz

Saludos desde Medellín - Colombia