Creating multiple records from one form (1 Viewer)

[Uncle Gizmo]

Any ideas?

Is the form Open?

 

[mike60smart]

Hi
What is the SQL for the Command Button's ON Click Event to open the Report?

 

[Atthe]

Hi
What is the SQL for the Command Button's ON Click Event to open the Report?

Yes the command button is set to open the report?

 

[mike60smart]

Yes the command button is set to open the report?

Yes we know this but if you can show us a screen shot of either the Macro or the On Click Event associated with the Button.

 

[Atthe]

Yes we know this but if you can show us a screen shot of either the Macro or the On Click Event associated with the Button.

Sorry about that, see attached

 

[mike60smart]

Sorry about that, see attached

Hi

What you need is along these lines which would be the VB On Click Event of the Command Button.

In the Properties of the Command Button - select the Event Tab and then Click in the On Click Row

Next Click on the Elipse (...) at the end of the Row which will then display the Choose Builder.

Select Code Builder and Click OK

The following 2 lines will go in the Blank space between the Code as follows:-

Private Sub Command61_Click()
If Me.Dirty Then Me.Dirty = False

DoCmd.OpenReport "ReportName", acPreview, , "[RecID]=" & me.RecID
End Sub

You would need to replace "ReportName" with your Report Name and the Unique Identifier "RecID"

 

[MajP]

Thanks for that, I have sorted that out and all working fine now.

This is an excellent article by @isladogs on relationships. Strongly recommend this to anyone learning about Access relations and queries.

Relationships1 - Mendip Data Systems

Database applications for businesses, schools and individuals

www.mendipdatasystems.co.uk

 

[MajP]

As @mike60smart points out one of the easiest ways to open a form or report to a filter set of records is to do this with the docmd.openForm or docmd.openreport.

DoCmd.OpenForm method (Access)

Office VBA reference topic

docs.microsoft.com

If your criteria is a string you need to surround with single quotes.
Docmd.openReport "ReportName", acPreview, , "[Assembly NumberSpec]='" & me.Assembly_NumberSpec & "'"

Also in the future do yourself a big favor and do not put any spaces or special characters in any field names or any other object names. If you have spaces you have to add special handling in all code and queries. The name always has to be in [square brackets]. Not required if no space. In vba the name gets an underscored added automatically.

 

[Atthe]

As @mike60smart points out one of the easiest ways to open a form or report to a filter set of records is to do this with the docmd.openForm or docmd.openreport.

DoCmd.OpenForm method (Access)

Office VBA reference topic

docs.microsoft.com

If your criteria is a string you need to surround with single quotes.
Docmd.openReport "ReportName", acPreview, , "[Assembly NumberSpec]='" & me.Assembly_NumberSpec & "'"

Also in the future do yourself a big favor and do not put any spaces or special characters in any field names or any other object names. If you have spaces you have to add special handling in all code and queries. The name always has to be in [square brackets]. Not required if no space. In vba the name gets an underscored added automatically.

Thanks for that.

Next on my list to implement is a system to manage the booking in & out of the tooling ie I would like a form where the user can choose what Tool Group to book out and where it is being booked out too and then be able to book the tooling back in and change the status field of each tooling within the group (So the user can record any damage that happened whilst the tooling was in use Is the best way to do this to add another table?

Also would like to be able to track when the tooling was in use at what time etc

Thank you for any pointers