Visual Basic - Ayuda con este codigo para guardar en bd

Private Sub GuardarNPM(Posicion, strNumeroAuto, strPiloto, strMarca)

Dim db As Database
Dim rs As Recordset
Dim sql As String
Dim Vueltas As String

Set db = OpenDatabase("e:\Gescar\Gescar.mdb")
sql = "SELECT * FROM Tiempos Where Paso = Posicion "
Set rs = db.OpenRecordset(sql)

With rs

Vueltas = !Vueltas

End With

rs.Edit
rs("Numero") = strNumeroAuto
rs("Piloto") = strPiloto
rs("Marca") = strMarca
rs("Vueltas") = Vueltas + 1

rs.Update
rs.Close
db.Close

Call ActualizarDesarrollo

End Sub

El problema aparece en la linea "Set rs = db.OpenRecordset(sql)" con un error que dice Pocos parametros. Se esperaba 1. Bien ahora si yo en la linea anterior es decir
"sql = "SELECT * FROM Tiempos Where Paso = Posicion " " la reemplazo por esta
"sql = "SELECT * FROM Tiempos Where Paso = '5' " " por ejemplo forzando a que guarde en esa posicion va de maravillas. Que es lo que puede estar pasando????

Muy fácil, estás diciendo q abra Paso = Posicion, siendo posicion el literal "posicion".
Pon esto:
sql = "SELECT * FROM Tiempos Where Paso =" & Posicion

y ya.
Siendo Posición un númerico.

Si posición fuese una cadena/char.

sql = "SELECT * FROM Tiempos Where Paso ='" & Posicion "'"

Gracias amigo por tu tiempo lo pruebo y te digo como va