Filtre VBA avec Boite de dialogue

Bonjour

je souhaiterais filtrer une colonne avec un filtre

"Contient" le mot saisi dans la boite de dialogue

voici le code essayer mais il ne reconnait pas la variable de la boite de dialogue

merci

Sub Séparation()

Dim Libellé As String
Libellé = InputBox("Libellé :", "Correction Madonne", Texte)
Sheets("Base").Select
ActiveSheet.Range("$A$1:$L$39").AutoFilter Field:=12, Criteria1:="=*Libellé*" _
, Operator:=xlAnd