[Resolvido]Abrir Formulário Com Filtros

Pessoal, Boa Tarde!

Tenho um formulário que ira abrir outro formulário, porém eu quero usar critérios de filtro para o próximo formulário, como uso mais de um critério?

Atualmente uso o seguinte código

Dim IDfiltro as string


IDfiltro = "[Campo na Tabela]=" & "'" & [Nome do formulário].[Campo no Formulário] & "'"

(esse código serve para um critério), Como eu adapto mais critério de filtro nesse código? queria algo assim



IDfiltro = "[Campo na Tabela]=" & "'" & [Nome do formulário].[Campo no Formulário] & "'" and [Proximo Campo na Tabela] = [Nome do formulário].[Proximo Campo no Formulário]

DoCmd.OpenForm "Nome do formulário", , , IDfiltro

Porém não estou conseguindo adaptar, alguém pode me ajudar? pode ser outro código desde que eu consiga usar mais de um critério de filtro.

Desde já Obrigado.

Tente assim:

Dim IDfiltro As String
IDfiltro = "[ID]=" & [Forms]![frmAlterar].[txtID] & " and [Valor] = " & [Forms]![frmAlterar].[Valor] & ""
'So pra mostrar como esta sendo aplicado o Filtro.
MsgBox IDfiltro

Se atente para a Aspa " No inicio do filtro e o fechamento apenas no Final " ( " [ID]=" & [Forms]![frmAlterar].[txtID] & " and [Valor] = " & [Forms]![frmAlterar].[Valor] & " " pois acontece de o VBA add uma ou ate duas "" a mais no final...

Obs: Nesse exemplo usei "" aspas simples entre os campos pois se trata de Números, caso filtre por Texto vai ficar entre ' " ... " '.

Apenas para colocar status de resolvido