Usar o resultado de uma função como critério consulta

Boa tarde abigos.

Na minha consulta, no campo PILOTO, utilizo uma função que retorna o valor de uma cbox (uma string):



Após selecionar o valor (no método ao alterar do cbox), ele altera o conteudo do Sel_piloto() para o valor da cbox.



Os valores contidos no cbox são:



O em cada registro, o campo PILOTO da consulta tem um valor desses contidos na cbox. Gostaria que, ao selecionar 'OF', ele procurasse por 'OF ou UNIF', mas quando tento usar da forma que coloquei no vba na segunda figura, nada retorna. Alguem pode dar alguma luz?


Att,
cr4x

Veja no arquivo em anexo

veja a consulta resultado

1 - Eu recomendo retirar a condição da consulta origem (1ª imagem ).
2 - Eliminar a função Sel_Piloto (A qual vocês não determinou qual tipo de dado seria retornado.
Ex.:
Function Sel_Piloto() As String
End Function)


3 - Através do evento de mudança da Combo conforme você está fazendo, manipular o filtro do formulário exatamente conforme deseja.

Código:


Private Sub cbo_setor_piloto_Change()

   If cbo_setor_piloto.Value = "OF" Then
      Me.Filter = "=Piloto IN ('OF','UNIF' )"
   Else
      Me.Filter = "=Piloto = '" & cbo_setor_piloto.Value & "'"
   End If

   Me.Requery
End Sub