Visual Basic - Error coma

Gente, antes que nada saludos.
Tengo este codigo y me tira error "hay coma en la expresion". Necesitaria solucionarlo.

Sub errorcoma()
Dim base As Database
Dim tabla As Recordset
Dim pritot As Double

Set base = CurrentDb
Set tabla = base.OpenRecordset("tabla1", dbOpenSnapshot)

pritot = 407.66

tabla.FindFirst ("Hasta > " & pritot & "") 'aca tira el error'

End Sub
Si pritot es un numero entero el codigo corre sin problemas.

Desde ya les agradezco un monton.

Rodolfo

Prueba a sustituir

tabla.FindFirst ("Hasta > " & pritot & "") 'aca tira el error'

Por

tabla.FindFirst ("Hasta > '" & pritot & "'") 'lleva comillas simples

Prueba a poner pritot = 407,66 o como lo tengas en la configuración regional para los decimales

Gracias por las molestias gente. Lo soluciones usando str()

tabla.FindFirst ("Hasta > " & Str(pritot) & "") 'aca modifique y anduvo'

Saludos y gracias por la atencion.

Rodolfo