I want to make a new record, and then assign it all the values of the
record 5 records back, for example, record 7, when being made will
have the values of record 2, and I'm making this in VBA. I have tried
with Recordset("ID")=Recordset.Move(-5)("ID"), but then it says
"Expected function or variable". Can anybody tell me what to do? I'm
trying very hard to make the program as short as possible, so I'm
really looking for a solution, that can be put together on one line
(and here I don't mean several lines being put together with : ), so
if that is at all possible, it would be a big help.

Michael K. P.

Dim Rst As DAO.Recordset
Set Rst = Me.RecordsetClone
DoCmd.GotoRecord,,acNewRec
Rst.MoveLast
Rst.Move -5
With Rst
Me!Control1 = !Field1
Me!Control2 = !Field2
Me!Control3 = !Field3
etc
End With
Rst.Close
Set Rst = Nothing

Note - Controls 1, 2 and 3 are the names of the controls on your form bound
to Fields 1, 2 and 3 in your recordsource.

--
PC Datasheet
Your Resource For Help With Access, Excel And Word Applications
resource (AT) pcdatasheet (DOT) com
www.pcdatasheet.com




"Michael Kragh Pedersen" <m_kragh_pedersen (AT) hotmail (DOT) com> wrote

Damn, I thought, I had been specific enough It's something, I'm
making for myself, in order to make putting in data a little easier,
therefore it's not something for distribution. Therefore, I have only a
form with one button, for starting the code, but not any other controls.

Michael K. P.

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!