Problemas com função Dlookup no VBA

Encontrei dois problemas com a função Dlookup:

1º Problema:
DLookup("Cota", "qryBCalcIndices", _
"De <" & Me.SomBCGeral & "And Ate >=" & Me.SomBCGeral)

O campo SomBCGeral é numérico. Quando não possui números após a vírgula (720,00), a função funciona. Mas quando há números após a vírgula (720,22) gera o seguinte erro:
Erro de sintaxe(vírgula) na expressão de cosulta 'De < 720,22 And Ate >= 720,22'

2º Problema:
Uso de variável como critério da função gerra erro Null.
O exemplo abaixo funciona, porque o valor da variável está antes da função.
Mas caso seja colocado posteriormente, ocorre o erro.
Declarar a variável depois da função é útil se o valor não é fixo.

intSearch = 1
varX = DLookup("[NomeEmpresa]", "Expedidores", _
"[CódigodoExpedidor] = " & intSearch)

Tente substituir a vírgula por ponto:

Código:

DLookup("Cota", "qryBCalcIndices", "De <" & Replace(Me.SomBCGeral, ",", ".") & And Ate >=" & Replace(Me.SomBCGeral, ",", ".") & ")

Não vi que o Norberto tinha respondido, rsrsrs.

Problema da vírgula resolvido!!! Senhores, Criquio.

Somente falta o problema da variável: se posta após a função, retorna erro NULL.

Não entendi essa da variável. Se tiver o valor desse critério em um campo, tente usar o próprio campo.

Rapaz use a função NZ para nulos.

varX = Nz(DLookup("[NomeEmpresa]", "Expedidores", _
"[CódigodoExpedidor] = " & intSearch),0)

Vou testar Nz. Mas acredito que aí está a solução para não gerar o erro null!!!

Infelizmente não funcionou.

Gondim Pereira amigão, coloque aqui todo o código que mexe com essa variável.