VBA coding populating a table from form entries

[pmkieffe]

I have a form set up with command boxes pulling from three different tables. How can I code a command button to populate a new table with each entry combination from the form?

Thanks,
pmkieffe

 

[MajP]

Not sure if this is simply what you mean.

Private Sub cmdPopulate_Click()
Dim rs As DAO.Recordset
Dim cntrl As Access.Control
Set rs = CurrentDb.OpenRecordset("tblNew", dbOpenDynaset)
rs.AddNew
For Each cntrl In Me.Controls
If Not cntrl.Tag = "" Then
rs.Fields(cntrl.Tag) = cntrl.Value
End If
Next cntrl
rs.Update
End Sub


This assumes that you put the name of your field into the tag propery, and that tblnew exists already.