Passing through a subform with a VBA

[rbasniak]

Hi people,

How do I iterate through all registers in a subform which is in the form using VBA?

Thanks,
Rodrigo Basniak

 

[PHV]

And what is a register ?
Please, read carefully the second FAQ in my sig.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[dhookom]

I believe "registers" are "records". If so, you can use DAO code that sets a DAO.Recordset to the subFormName.Form.RecordsetClone. You can then move through the recordset like any other recordset.

Duane MS Access MVP
[green]Ask a great question, get a great answer.[/green] [red]Ask a vague question, get a vague answer.[/red]
[green]Find out how to get great answers faq219-2884.[/green]

 

[rbasniak]

Sorry PH :-(, and thanks Duane :-D, that's what I wanted to say.

I tried the following code:

Dim rst As Recordset

Set rst = Me.Products_Subform.Form.RecordsetClone

But I'm getting the Incomptible Types error (13) on the Set line.

What am I doing wrong?

Best regards,
Rodrigo Basniak

 

[rbasniak]

I solved the problem with this:

Dim frm As Form
Set frm = Me.Products_Subform.Form

frm.RecordsetClone.MoveFirst

....

Thanks at all people,
Rodrigo Basniak

 

[PHV]

The problem was here:
Dim rst As [!]DAO.[/!]Recordset

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886