Access - Consulta con parámetros

Que tal amigos foreros!

Tengo un inconveniente...

En un botón he colocado el siguiente código:

Private Sub Comando0_Click()
Dim SQL As String
Dim pregunta As String
pregunta = MsgBox("Esta a punto de grabar dos registros en la IntTotal" & vbcrl & _
" esta de acuerdo ", vbYesNo + vbCritical, "Aviso")
If pregunta = 6 Then
DoCmd.SetWarnings False

strSQL = "INSERT INTO IntDepurada ( NUMHISTO, APENOMPA, NUMAFIL,NTIPOINTE)"
strSQL = strSQL & " SELECT NUMHISTO, APENOMPA, NUMAFIL, NTIPOINTE"
strSQL = strSQL & " FROM IntTotal"
strSQL = strSQL & "WHERE ((IntTotal.NTIPOINTE) = I))"

CurrentDb.Execute strSQL, dbFailOnError
DoCmd.SetWarnings True
MsgBox "concluido exitosamente", , "Gracias"
End If
End Sub

Funcionaba muy bien hasta que agregué la línea "WHERE......", ahora me aparece un cartel que dice "Error 3131 en tiempo de ejecución. Error de sintaxis en la cláusua FROM"....

En qué me pude haber equivocado, lo único que quiero es que además de pasar los datos de la tabla IntTotal a la tabla IntDepurada me filtre los que en el campo NTIPOINTE tengan la letra "I".

Gracias!!!

a simple vista veo que te hace falta un espacio entre FROM y WHERE

Gracias Enrique, pero evidentemente eso no es... he colocado el espacio e inclusive un paréntesis que me faltaba... pero ahora me aparece un cuadro que dice: Error 3061 en tiempo de ejecución. Pocos parámetros. Se esperaba 1.

: (

Ceci.

Problema resuelto Gracias!!!!

Me faltaba colocar la comilla simple a cada lado de la letra 'I'.

:)

Ceci.