Boa noite, a todos.

Estou com dificuldades em preencher um ComboBox com SQL que possui critérios de Data Inicial e Data Final, pois estou com dificuldades em preencher o ComboBox de acordo com as Datas selecionadas.
A principio o ComboBox esta preenchendo com todos os registros distintos, pois eu além de preencher com os registros distintos gostaria que aparecesse somente os registro de acordo com a data selecionada.

Já realizei formatação das variáveis que recebem as datas mas sem sucesso.

vDataInicial = Format(DTP4.Value, "mm/dd/yyyy")
vDataFinal = Format(DTP5.Value, "mm/dd/yyyy")

Anexo consta uma base que estou utilizando para realizar os teste, onde toda e qualquer ajuda sempre é bem vinda.