CreateForm help

[jjp3308]

I want to create a form dynamically using the createform method. The
form's record source is a query. I want to make the form continuous and
in tabular format...... and I also want to automatically put the fields
from the record source in the form.... If one were to do this using the
form wizard, this what I want to accomplish.

Thanks

[Tanis]

[e-mail] wrote:

I want to create a form dynamically using the createform method. The
form's record source is a query. I want to make the form continuous and
in tabular format...... and I also want to automatically put the fields
from the record source in the form.... If one were to do this using the
form wizard, this what I want to accomplish.

Thanks

Try this.

Private Sub Form_Template_Click()

Dim frm As Form

'Create a new form based on the XXXXX form
Set frm = CreateForm(, "existing_form")
DoCmd.Restore

'Set RecordSource property to inputQuery query
frm.RecordSource = "YourInputQuery"

End Sub

[jjp3308]

Tanis wrote:

[e-mail] wrote:

I want to create a form dynamically using the createform method. The
form's record source is a query. I want to make the form continuous and
in tabular format...... and I also want to automatically put the fields
from the record source in the form.... If one were to do this using the
form wizard, this what I want to accomplish.

Thanks

Try this.

Private Sub Form_Template_Click()

Dim frm As Form

'Create a new form based on the XXXXX form
Set frm = CreateForm(, "existing_form")
DoCmd.Restore

'Set RecordSource property to inputQuery query
frm.RecordSource = "YourInputQuery"

End Sub

[jjp3308]

Tanis wrote:

[e-mail] wrote:

I want to create a form dynamically using the createform method. The
form's record source is a query. I want to make the form continuous and
in tabular format...... and I also want to automatically put the fields
from the record source in the form.... If one were to do this using the
form wizard, this what I want to accomplish.

Thanks

Try this.

Private Sub Form_Template_Click()

Dim frm As Form

'Create a new form based on the XXXXX form
Set frm = CreateForm(, "existing_form")
DoCmd.Restore

'Set RecordSource property to inputQuery query
frm.RecordSource = "YourInputQuery"

End Sub

I tried this but in the end when the above code is run, I get a blank
form with the field list box showing, which I'm assuming it's asking me
to drag the field onto the form. Any idea of how I can 'drag' the field
onto the form automatically ?

Thanks