Filtro parou de funcionar

galera bom dia. Estava procurando um tipo de filtro bacana, mas derepente parou de funcionar poderia me ensinar , pois na sei mas 

Código:

'Dim filtro As String
'filtro = "" & Me.cbo_procurar_cliente.Column(1)
'Me.Filter = filtro
'Me.FilterOn = True

 e como tirar esse vazio do subfrom

Opa, boa tarde...

Segue um exemplo, não sei se ajuda !

Boa noite,  vou dar assim que chegar

Obrigado pela ajuda amigo, mas não me mostrou o erro do meu filtro