Filtro em ListBox

Tenho uma listbox que lista minhas contas a pagar. Coloquei no form 2 campos data3 e data4 que filtram as contas entre estas datas. O problema é como voltar para a situação anterior abaixo a SQL que deixaria a listbox em situação inicial, mas dá erro sempre

Me.ListaPagar.RowSource = "SELECT CONTAS_PAGAR.cod_conta, CONTAS_PAGAR.nome_credor, CONTAS_PAGAR.cod_tipo_conta, CONTAS_PAGAR.vencimento, CCur([valor_conta]) AS VC, CONTAS_PAGAR.data_pgto, CONTAS_PAGAR.doc_pgto FROM CONTAS_PAGAR WHERE (((CONTAS_PAGAR.nome_credor) Like " * " + [Formulários]![Master]![Texto14] & " * ") And ((CONTAS_PAGAR.Vencimento) >= Date And (CONTAS_PAGAR.Vencimento) <= Date + 60)) Or (((CONTAS_PAGAR.Vencimento) >= Date And (CONTAS_PAGAR.Vencimento) <= Date + 60) And ((CONTAS_PAGAR.doc_pgto) Like " * " + [Formulários]![Master]![Texto14] & " * "))ORDER BY CONTAS_PAGAR.vencimento DESC;"


O erro é tipos incompativeis e aparentemente tem a ver com o LIKE....

Erro de tipos incompatíveis tem a ver com os campos que você está comparando.

Ex. Você quer filtrar por data mas está informando uma string.