Hola, mira lo que hago yo para hacer una búsqueda con un inputbox y luego ejecutarla en una sentencia sql, algo así :
En un módulo, declaro el inputbox...
declaro...
Código:
Public SubGrupo As String
Realizo una función para colocar el inputbox
Código:
Public Sub buscarsubgrupo(a)
On Error GoTo Errores
SubGrupo = InputBox("Ingrese el subgrupo a buscar: ", "Búsqueda por Subgrupo", "Ej. 1")
Exit Sub
Errores:
End Sub
En el formulario, donde tengas tu sentencia SQL "Ej. un botón"
Código:
Private Sub cmdactualizar_Click()
On Error GoTo Errores
'llamada a la función
buscarsubgrupo(a)
'yo hago la actualización de otra forma
sql = "UPDATE TABLA SET TABLA.SubGrupo = 'Z' WHERE TABLA.Subgrupo = '" & SubGrupo & "'" '<--- aca llamo a mi inputbox
cn.Execute sql
'NOTA MODIFICA TU SENTENCIA COMPARANDOLA CON LA MIA
'DoCmd.RunSQL "UPDATE tabla SET tabla.SubGrupo = ""Z"" WHERE tabla.[SubGrupo]= " & SubGrupo & "; "
Exit Sub
Errores:
End Sub
Espero te sirva...