[Resolvido]Duplo criterio

Boa tarde

Tenho esta funçãopara só me deixar registar um registo por dia, e funciona direito.

X = DCount("[LN]", "Encomenda1", "[Data] =#" & Format(Me.Data, "mm/dd/yyyy") & "#")

Queria acrescentar mais um critério mas não estou a chegar lá assim não funciona:

Acrescentar a parte a vermelho (é texto)

X = DCount("[LN]", "Encomenda1", "[Data] =#" & Format(Me.Data, "mm/dd/yyyy") & "#")  And [Cliente] = " & Me!cliente & "


Obrigado

Assis

Só esqueceu de mover o 2º parenteses da função para o final.

Acredito que Me!Cliente seja numérico, então tirei  o final da tua frase, que
se for nome (string) seria assim:

"#  And [Cliente] = '" & Me!cliente & "'")

Observe as aspas simples

Abaixo, se o valor for numérico (sem as aspas simples)
X = DCount("[LN]", "Encomenda1", "[Data] =#" & Format(Me.Data, "mm/dd/yyyy") & "#  And [Cliente] = " & Me!cliente)

Obrigado Noob

Ótimo amigo

Boa sorte !