Hola
Ese mensaje te esta diciendo que la conexión a la bd ya esta abierta (lo habrás abierto en otra parte del código), lo que puedes hacer es comprobar si la conexión esta abierta y si no, abrirla, para ello:
Cita: If cnPrueba.State = adStateClosed Then cnPrueba.Open
Para controlar la sentencia UPDATE mete su valor en una variable y pon un punto de interrupción para controlar el valor final que tiene la UPDATE y luego probarla en access.
--Saludos--