[Resolvido]Mais de um filtro em STRFILTER

Boa tarde, amigos

Estou com um probleminha por aqui na hora de filtrar mais de um campo para abrir um form.

Pelo "normal" é como o código abaixo...

Private Sub Comando473_Click()
Dim strDocName As String
Dim strFilter As String
strDocName = "inbox"
strFilter = "nCONTRATO= Forms!form_index!nCONTRATO"
DoCmd.OpenForm strDocName, acNormal, , strFilter
End Sub

Como faço para filtrar por mais de um campo?

No caso, algo como "strFilter = "nCONTRATO= Forms!form_index!nCONTRATO" & "PRODUTO= Forms!form_index!PRODUTO"

Pesquisei à vera, testei várias vezes e nada...

Desde já, agradeço a atenção de todos.

Tente trocar & por And.

Olá, criquio - obrigado pela resposta!

Obtenho o mesmo erro de antes... "Tipos incompatíveis." Tentei mudar a variável, mas dá erro também...

Tente
strFilter = "nCONTRATO=" & Forms!form_index!nCONTRATO & " and PRODUTO=" & Forms!form_index!PRODUTO

Alexandre, recebo a seguinte mensagem: "Erro em tempo de execução 3075 - erro de sintaxe (operador faltando) na expressão de consulta 'nCONTRATO=640 PRODUTO=CREA'.

Duvido que seja essa a mensagem
Coloque
strFilter = "nCONTRATO=" & Forms!form_index!nCONTRATO & " and PRODUTO=" & Forms!form_index!PRODUTO
msgbox strfilter

e escreva o que a msgbox mostra

Olá

Quando faz uma filtragem por string e não por número é necessário o uso do apóstrofo (ou aspas duplas)

strFilter = "nCONTRATO=" & Forms!form_index!nCONTRATO & " and PRODUTO='" & Forms!form_index!PRODUTO & "'"

Te convido para assistir minha vídeo-aula sobre filtragens:

Tutorial sobre filtragens com vídeo-aula

Faça o teste que o Alexandre te pediu, usando o Msgbox, que é muito útil de entender o que está acontecendo.

Sucesso!

Bom dia, amigos.

Visualizando a msgbox, como sugerido pelo Alexandre e adicionando o apóstrofo nos campos de texto consegui resolver a questão do filtro.

O problema era o seguinte: como este campo nCONTRATO não é um campo numeral (os registros não salvavam com os zeros à esquerda, por isso o defini como tal anteriormente - podendo adicionar-se letras ao mesmo), então ele também precisava do apóstrofo, além do campo PRODUTO. Só consegui visualizar isto com a msgbox strFilter. Um strFilter somente com um campo funcionava sem apóstrofo - com mais de um não, ficando a linha, no final, da seguinte forma:

strFilter = "nCONTRATO='" & Forms!form_index!nCONTRATO & "' and PRODUTO='" & Forms!form_index!Produto & "'"


[b]

Praticamente imperceptível para que está começando...
Grato pela indicação da video-aula, Avelino. Vou conferir com áudio posteriormente!

Questão resolvida. Agradeço a atenção e ajuda de todos.

Ainda bem que resolveu.
Dificilmente chegaria a esta adaptação, pois na primeira mensagem disse que funcionava e não tinha apóstrofo

Pois é, Alexandre. Buscando um campo sozinho independente dele ser numeral ou texto, encontra-se sem maiores problemas. Agora, quando junta-se dois campos, que problema... Ainda precisei juntar um terceiro - só consegui através do msgbox depurando o erro. É complicado acertar a sequência de aspas e apóstrofos quando sem os mesmos funcionava perfeitamente.

Dificilmente (senão impossivelmente) chegaria a tal conclusão sozinho mesmo...! Estou muito grato e a lição valeu.