Hola,
primero, comprueba que todos los Text1 tengas datos y segundo ¿qué es el "Id" final, una variable?
Creo que debería ser
...Where id = " & IText1(0)
Si en campo Id de la tabla es autonumérico lo tienes que omitir en la consulta, pero no en el Where
