What is the alternative to copy/paste function available in Access 2003 not in 2007?

[Jock]

My purchase order system sequentially added the next number to the new order when I clicked the macro button set up with copy/paste functions and it worked well. I cannot do this now as 2007 does not offer these macro functions.

My system simply looked at the last record copied the number in the field - opened a new record and pasted the number+1.

I cannot use the autonumber function because if a record is raised and then not proceeded with I will have a missing number in the audit trail. The trail must be sequential with no missing numbers.

I am a self taught ( I think they call it discovery learning) Access user and could just do with a little (lot) bit of guidance here. Thanks in advance. Jock

[NeoPa]

Is it really a macro, or might it be running VBA code?

If it's code we can help you to resolve the issue. Unfortunately I cannot help with macros as I never use them. For help you would need to post what you have that's not working of course.

[ChipR]

You might want to use DMax.

[NeoPa]

That's certainly what I'd suggest Chip, but if he's restricted to using simple macros that won't be possible.

[Jock]

@NeoPa
Thanks, I was wondering if there was an event procedure script using the DoComd function that would successfully do a cut/paste and increment the pasted number by one.

I need to keep it simple as my access knowledge level is limited.

[NeoPa]

To be fair Jock, I doubt that would even suit your needs well.

What you need to do (we can help if you post enough detail) is to add one to the maximum value already held in the table for that field. This is what Chip was referring to in his post #3. It's certainly the way to go I would say.

Copying and pasting is possible (I use Copying in a database I designed for storing common posts for Bytes) but I can't think it would be appropriate here.

I'll include a doctored version of the procedure here in case it's of any use :

Private Sub txtCopy_Click()
    With Me.txtCopy
        Call .SetFocus
        .SelStart = 0
        .SelLength = Len(.Value)
        Call DoCmd.RunCommand(Command:=acCmdCopy)
    End With
End Sub

Of course, even in this case, were you intending to add 1 to the current value of a control you're better off simply saying :

DestControl = Me.SourceControl + 1

in your code instead. This is bound to cause you problems eventually though. Use DMax() is the only sensible suggestion.