Visual Basic - error al guardar en registro existente

Buenas, les consulto a los que saben
Estoy guardando registros, verifico si existe un registro por el numero de documento. Si existe lo modifico y si no existe lo agrego.
Cuando existe y lo quiero modificar me da error.: "No se puede encontrar la fija para su actualización: algunos valores han cambiado desde la última vez que se leyó". Me lo muestra en "adoLOCAL.MoveLast"


Set adoLOCAL = New Recordset
adoLOCAL.Open "select * from personas where Documento = '" & valorNroDoc & "'", dbLOCAL, adOpenStatic, adLockOptimistic

If adoLOCAL.RecordCount = 0 Then
adoLOCAL.AddNew
Else
adoLOCAL.Update
End If

adoLOCAL.Fields(1) = 1
adoLOCAL.Fields(2) = aaa1
adoLOCAL.Fields(3) = 1fsafssca

adoLOCAL.MoveFirst
adoLOCAL.Close

Si abres un recorset de tipo static, no puedes hacer modificaciones

Hola, no se si entiendo bien lo que te trae error, pero veo que, por un lado tenes un if preguntando si la cantidad de registros es o, si es 0 haces un addnew pero no especificas los valores que querés insertar.

Luego en el update lo mismo, no especificar que campo modificas ni que valores querés ponerle.

Mas abajo haces un .Fields = a algo, cuando llamas a un .fields es para mostrar el dato justamente no para asignarle un dato, al menos es lo que entiendo.