Code for Opening ContactF - Microsoft Access Forum


	Back to Access Forum Comments List

Upload Images @Reply Bookmark Link Email Next Unseen

Code for Opening ContactF

Roger Strate

7 months ago

In OnClick this is the code: Private Sub OpenContactBtn_Click()

    DoCmd.OpenForm "ContactF", , , "MinisterID=" & MinisterID

End Sub

In InsertInto this is the code

Private Sub InsertIntoBtn_Click()

        CurrentDb.Execute "INSERT INTO ContactT (MinisterID, Description) " & _
        "VALUES (" & MinisterID & ", """ & Notes & """)"

    Notes = Null
    Me.Refresh

End Sub

Donald Blackwell @Reply

7 months ago

I think you just need to add the FamilyID field in your SQL statement and add the value of the familyID from the subform. If I read it right, I think your sub should look something like:

Private Sub InsertIntoBtn_Click()

    

        CurrentDb.Execute "INSERT INTO ContactT (MinisterID, Description, FamilyID) " & _

        "VALUES (" & MinisterID & ", """ & Notes & """, " & FamilyHeadF.Form!FamilyID & ")"

            

    Notes = Null

    Me.Refresh



End Sub

	Donald Blackwell @Reply 7 months ago
However, if I misinterpretted, replace FamilyHeadF with the name of your subform control.

	Roger Strate OP @Reply 7 months ago
Donald you are absolutely awesome and I am very impressed. I have been working on this for weeks and even consulted ChatGPT several times and your solution is the only one that works. Thank you so much, I am in awe of your skills again.

	Donald Blackwell @Reply 7 months ago
Always happy to help. If you need to work with subform values again, don't forget about Richard's Value From Subform video if you run into any more snags.

	Roger Strate OP @Reply 7 months ago
Good advice, thank you Donald I will remember that.

This thread is now CLOSED. If you wish to comment, start a NEW discussion in Access Forum.

Next Unseen

New Feature: Comment Live View