Visual Basic - Borrar registro.

Estoy intentando eliminar un registro en una tabla que tiene activado como clave principal un autonumérico. Realizo primero un Select tal como este:
Set Rcs = CurrentDb.OpenRecordset("SELECT * from Tabla WHERE Campo1 = " & Valor1 & " and Campo2 = " _
& Valor2 ORDER BY Campo3 ASC", dbOpenDynaset, dbSeeChanges)

y cuando posteriormente intento borrarlo me da un mensaje de error diciendo que no es posible pues otro usuario está modificando el registro. El campo clave autonumérico no es ninguno de Campo1, Campo2 y Campo3.

¿Cómo puedo borrar ese registro?

Tienes que cerrar la BD.
Luego volver a SETearla y entonces podrás borrar.
Hazlo con Edit y Update y vuelve a cerrar.

Podrías ser algo más concreto por favor. No entiendo lo de cerrar la base de datos y tampoco entiendo lo de hacerlo con un Edit y Update y volver a cerrar.

Lo que pretendo es posicionarme en un registro y luego elimininarlo. ¿Como puedo eliminar un registro con un Edit y luego un Update?

Gracias.

BaseDatos.Close 'Así la cierras
Ahora vuelves a abrirla como hiciste al principio
Set etc., etc.

'Uso de Delete para borrar un registro en el Recordset
'*********************************************************
'Uso del método Find para localizar el registro que se va a cambiar
'******************************************************
NewDyn.FindFirst "Apellidos = 'Roseta Menéndez'"
'********************************************
'Comprobar la propiedad NoMatch para evitar un error
'********************************************
If NewDyn.NoMatch Then
MsgBox "No se encuentra"
Else
'******************************************
'Uso del método Delete para borrar el registro
'******************************************
NewDyn.Delete
End If

'Uso de Edit y Update para cambiar los datos en el registro
'*********************************************************
'Uso del método Find para localizar el registro que se va a cambiar
'*******************************************************
NewDyn.FindFirst "Apellidos = 'Pérez López'"
'********************************************
'Comprobar la propiedad NoMatch para evitar un error
'********************************************
If NewDyn.NoMatch Then
MsgBox "No se encuentra"
Else
'****************************************************
'Uso del método Edit para establecer los cambios del registro
'****************************************************
NewDyn.Edit
'***************************************************
'Colocar la información necesaria en el buffer de copia
'***************************************************
NewDyn("Direccion") = "Apartado de Correos 3.872"
NewDyn("Ciudad") = "Badalona"
NewDyn("Provincia") = "Barcelona"
NewDyn("CP") = "08250"
'***********************************************************
'Uso del método Update para guardar los cambios en el Recordset
'***********************************************************
NewDyn.Update
End If

'Uso de AddNew y Update para añadir registros en una Recordset
'*********************************************************
'Uso de AddNew para añadir un nuevo registro
'*********************************
NewDyn.AddNew
'*******************************************************
'Coloca la información necesaria en los campos del Recordset
'*******************************************************
NewDyn("Apellidos") = "Velázquez Aragón"
NewDyn("Nombre") = "Manuel"
NewDyn("Direccion") = "Via Ancha, 74"
NewDyn("Ciudad") = "Bormujos"
NewDyn("Provincia") = "SE"
NewDyn("CP") = "41725"
'************************************************************
'Uso del método update (actualizar) para añadir el nuevo registro en el Recodrset
'************************************************************
NewDyn.Update