Buenas tardes.
Tengo el siguiente código:

Dim rsSocios As DAO.Recordset
Dim sqlSocios As String
sqlSocios = "SELECT * FROM SOCIOS"
Set rsSocios = CurrentDb.OpenRecordset(sqlSocios)
rsSocios.AddNew
rsSocios!Nombre.Value = TxtNombre.Value
rsSocios!F_alta.Value = TxtF_alta.Value
rsSocios!Aportacion.Value = TxtAportacion.Value
rsSocios!Frecuencia.Value = TxtFrecuencia.Value
rsSocios!Estatus.Value = "Activo"
rsSocios.Update

rsSocios.Close
Set rsSocios = Nothing

El problema es que si me agrega el nuevo registro, pero también me modifica la información del primer registro de la tabla con la información del registro nuevo, perdiendo la información original del primer registro.

¿Me podrán ayudar diciéndome que tengo mal en el código?, ¿O que me hace falta?

Saludos cordiales desde México D.F.