Erro em tempo de execução Uso de Null Inválido

Estou usando o comando

Private Sub FiltroPotencia_AfterUpdate()

DoCmd.ApplyFilter , "CStr([Potencia]) = '" & Me.FiltroPotencia & "'"

End Sub

É um campo numérico, mas usei CStr porque tem valores como 1,25 por exemplo.
Não sei porque ele localiza todos registros, menos quando eu escolho 1 na lista.
Dá "Uso de 'Null' inválido.

Por que será?

Qual seria a melhor forma de e localizar dados numéricos com decimal?
Ou a melhor forma de contornar esta situação.

Ah, existe sim um registro com o valor 1.

Grande Avelino,
infelizmente não deu certo com a opção Cdbl.
Com CStr está dando certo, exceto com o valor 1.
Por que será?