Fra Formular1 til Formular2

Use the button wizard to create a button whch opens your form. Then you will need to modify the line ov code which opens the form to something like this.

Private Sub Command10_Click()
On Error GoTo Err_Command10_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stLinkCriteria = "Somefield = " & Me.SubFormObject.Form.ID
    stDocName = "Form1"
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command10_Click:
    Exit Sub

Err_Command10_Click:
    MsgBox Err.Description
    Resume Exit_Command10_Click
   
End Sub

What us important here is how you refer to a record on the sub form

Me.SubFormObject.Form.ID

SubFormObject is the name of the subform object which contains the sub form NOT the name of the sub form.

hmm...

forstår ikke helt ...min subform hedder subFormAlle og henter sine data fra TblStamData så dvs. stLinkCriteria skal være:

stLinkCriteria = Me.SubFormAlle.TblStamData

eller ?

Never mind got it ...thx again ;0)

Hvorfor virker denne ikke...

DoCmd.OpenForm stDocName, GoToRecord, , acNewRec

åben formular ....tilføj ny (tom) record

nu spiller den ...Terry lav lige et svar ...  ;0)

Sorry, I hadnt seen you were having problems, but glad to see you got it to work! Thanks for the p's!

mvh
Terry