He estado buscando una forma de duplicar o copiar un conjunto de registros en VBA. Y con eso quiero decir, tener los datos subyacentes independientes entre sí.

Yo he tratado

Set copyRS = origRS.Clone
Set copyRS = origRS

Cuando uso cualquiera de los métodos, no puedo modificar un conjunto de registros sin modificar el otro. Entonces en este ejemplo:

Creo un conjunto de registrosRellene el conjunto de registros con el nombre JohnClono el recordsetModifico el clonadoComprobar resultado

Código:

Dim origRS As Recordset, copyRS As Recordset
Set origRS = New Recordset
'Create field
origRS.Fields.Append "Name", adChar, 10, adFldUpdatable
origRS.Open
'Add name
origRS.AddNew "Name", "John"
'Clone/copy
Set copyRS = origRS.Clone
'Change record in cloned/copied recordset
copyRS.MoveFirst
copyRS!Name = "James"
'This should give me "JamesJohn"
MsgBox copyRS.Fields(0).Value & origRS.Fields(0)

Pero desafortunadamente para mí, esto modifica ambos conjuntos de registros

Mi pregunta es:

¿Hay alguna forma de copiar un conjunto de registros de otro conjunto de registros y luego modificar los datos independientemente uno del otro (sin bucle)?

Sé que evidentemente puedes hacerlo a través de un bucle, pero ¿no hay otra manera?