Saving Records

[jmitchelldueck]

Hi,

I'm currently using a button with VBA code On Click event to save a record.

My code is this:

Private Sub Command117_Click()
DoCmd.Save
End Sub

Is there a better way to do this with code? I found the DoCmd on Google and guessed at Save, and it works, but I would like to improve my knowledge.

Thanks,
jmd

[June7]

That code does not save record. It is to save form or report object with design edits.

A record is committed to table when move to another record, close table/query/form, or run code.

DoCmd.RunCommand acCmdSaveRecord

[nick404]

If you need to bring up a blanked form for new data entry you could also do

DoCmd.GoToRecord , , acNewRec

[jmitchelldueck]

So if I have a multiple record form, moving from record to record will automatically save any changes I made in the previous? Meaning the Save button is only useful for the last record I edit.

[nick404]

If you have a multiple record form (like if you were browsing through & updating records) moving from record to record will save any changes made on the previous record. If you want to save the record and then let's say close the form; June's code is what you can use followed by a close command:

DoCmd.RunCommand acCmdSaveRecord
DoCmd.Close

If you have lots of data you want to enter consecutively (like at the end of the data you have a bunch of data you need to enter) then use:

DoCmd.GoToRecord , , acNewRec

and it will bring up a new form for additional entry, while saving the data you just entered. The current .Save function you have now does not save a record, it saves design changes.

[June7]

As noted, moving to another record or closing form will commit record to table. The acCmdSaveRecord command is not need in those cases.