autofill field in form based on field in previous form

[rivereridanus]

I'm not very experienced with vba coding, so I need help with this.


I have two forms, [New Person] and [questionnaire], both with the field personid. Personid in New Person is an autonumber.

I have a button called "continuebutton" which should have code to save the record in New Person, close New Person, and open questionnaire with questionnaire.personid = New Person.personid.

Here is what I have. Could anyone help?

Private Sub continuebutton_Click()
docmd.OpenForm(questionnaire,,,,,) (I know there's something wrong here)
Form.Dirty = False
DoCmd.Close
End Sub

[boblarson]

First, move the code around to this:

Private Sub continuebutton_Click()
Me.Dirty = False
   DoCmd.OpenForm "questionnaire", DataMode:=acFormAdd
   Forms!questionnaire.personid = Me.personid
DoCmd.Close acForm, Me.Name, acSaveNo
End Sub

[rivereridanus]

Thanks. That did it!