I'm probably going about this the wrong way all together, but what I'm trying to do is print a single record from a form in a report.
Basically after the client fills in the form they can print their "results report" using the click box (command button) in the bottom corner of the form. When the client clicks on the button it prints all the records ("result reports") of all the clients...no good of course.
Here's the code for the button:
Private Sub PrintSingleChamber_Click()
On Error GoTo Err_PrintSingleChamber_Click
Having a problem with a report, I have a form that i use to enter a new record to my database, what I want to do is put a button at the bottom of the form to print the record (via a report)
If I base this on a record that already exists, it works fine. However, If I have just entered the record the query the report runs off doesn't see the new record. To print that record I have to exit the completed record, then go back in to it and print. My aim is to remove this additional part of the process, I'm sure it's something really simple, but can anyone help?
I have a database which I am developing over time as I see ways of improving it and as I learn bits of vba. My current problem relates to invoicing (that I have probably created for myself!): I currently have two invoice report layouts because of different invoicing addresses.
I now want to add a cmd button to my invoice entry form that will firstly preview, then print the current record. I found elsewhere in the forum a way of previewing just the current record by way of specifying in the underlying qry the ClientID so that it selects the record displayed on the form.
I have this line of code which then previews the invoice:
This does not take account, though of the different invoice layouts. I think strictly speaking I should only have one invoice report, but what I want to say is this:
If the client is a private client, then preview rptInvoicePrivate, Else preview rptInvoiceLocumWork
I have tried entering this code that does not work
If SolicitorID = "1" Then DoCmd.OpenReport "rptInvoicePrivateClients", acViewPreview Else DoCmd.OpenReport "rptInvoiceLocumWork", acViewPreview End If
It comes back with a message that SolicitorID is not defined, but I have included Option Explicit.
I have done a search on this forum and found all the postings relating to printing only the current record for a report. I have a command button and have followed what these posts say. The report prints the current record but leaves out the data from the subform.
The database is a recipe organizer. The main form is called Recipes and the subform contains the ingredients for each recipe. This subform is called Ingredients.
I set up a command button with the following code:
Private Sub Print_Recipe_Click() On Error GoTo Err_Print_Recipe_Click
I currently am trying to print the current record that I have selected on my form and the subform that I have on the same page. If I try to print selected record it will only print out the main form correctly and will print out the first record on the sub form. I have tried to make a reprot of the current form and it only will do the main form and nothing from the sub form. I am willing to try whatever method would work in getting this to work. Thanks
I have made a navigation form that prints the current record out as a PDF and also the option to send the current record by email as a PDF. Both work perfect when you open the form outside the navigation form. But when you open it inside the navigation form, it does not print any of the information.
The problem is in the Query report, In the criteria box for field [RequsetID] it has
But what I need is that before printing, open the preview to set the margins and page size ... or at least to pre-configure so that when you press the button, and comes preformatted.
I have a form which is used for data entry for a new record only. I then wish to print some of this record's details on a report, using a command button on the form. At present I cannot filter to get just the current records details on the report - I am getting the report containing all records in the table.
I have got a tricky problem, for which I can find no answer - but then I am a bit of a novice here.
I have created a (probably too-) complicated relational database but what I really need is to be able to make abutton on the page of my address book form, so that when I hit it it creates a report of an address label for that current record on the screen only.
I hope this makes sense. If this is possible, I then need to extrapolate this technique to print a report of a subform (of samples sent) of a current client record.
I have a report that is tied to a table. On my table form I have a button that prints the report. Is there a way to only print the report for the current record showing on my form?
Private Sub Command30_Click() DoCmd.RunCommand acCmdSaveRecord Dim strDocName As String Dim strWhere As String strDocName = "Civil Process" strWhere = "[FormID]=" & Me!FormID DoCmd.OpenReport strDocName, acPreview, , strWhere DoCmd.RunCommand acCmdPrint End Sub
I can get this code to print only one record but then the button will always print this record. It will not change and print the current record.
FormID is an autonumber to give each record it own id.
I have managed to link a report to a form where you can double click on the surname and the report opens automatically BUT I want the report to only show the data from the record that I have double clicked - at teh moment the report is coming up with thousands of pages - one for each record.
Can anyone help me with this - I think it's probably something simple but I can't work it out on my own :eek:
hi i have 3 queries brought together in 1 form. i do not want a report to be printed out just the current record in form view. this is because i have a number of images per record. if i print out the current record and it only has 1 photo in a sub-form attached to the main form record, then the main form will print on 1 page which is what i want [screenshot 1]. But if there are 2 or more photos attached to the main record then the print command button prints out 2 pages for 2 photos, 3 pages for 3 photos and so on [screenshot 2]. any ideas as to how to limit the print command button to print out only 1 page per record regardless of how many photos their are attached to each record?? thanks
I have a report that shows weekly schedules (each week start with Sunday date for the row) for multiple teams (columns). It prints 1 year at a time.I have to add the Sunday dates by hand into the table for each year. I have added 2016 but when I generate the report I get a "no current record" error.By the way, I am not a "programmer" but I can usually figure out whats going on when we have a problem by looking at other code in the system and by finding answers for similar problems on the forum!!
I have a DB in Access 2007 which I'm having trouble with. I have a form, "Sub_Det_Frm", on which I would like to place a button to print the current record, (Primary Key is an autonumber "Employee Number") to a report "Sub_DetForm_Rpt".
I've used the instructions from, oops I can't show you the link! It's h(double t)p(colon)//allenbrowne(dot)com/casu-15(dot)html but I'm getting this error:
The expression On Click you entered as the property setting produced the following error: A problem occurred while Employee Details was communicating with the OLE server or ActiveX Control.
This error occurs when an event has failed to run because Microsoft Office Access cannot evaluate the location of the logic for the event. For example, if the OnOpen property of a form is set to =[Field], this error occurs because Access expects a macro or event name to run when the event is fired.
I have a form that when a user fills out the information and select a submit button. It brings up that record in reports in print preview for them to print. The issue i am having when the user enter the information, the report does not show any data until i refresh it. I tried include me.refresh,etc. No luck. I attached the code to make things simpler.
Private Sub Form_BeforeUpdate(Cancel As Integer) If Me.Dirty Then If MsgBox("Do you want to Submit this Contract Form? Clicking No will DELETE ALL ENTERIES,and Log You Off", vbYesNo, "CONTRACT FORM") = vbNo Then Me.Undo Cancel = True Else If MsgBox("PRINT FORM", vbOKOnly, "CONTRACT PRINT") = vbOK Then DoCmd.OpenReport "rpt_Contracts_Main", acViewReport, , "[CONTRACT_ID]=" & Me!CONTRACT_ID End If End If End If End Sub
The reports comes up, but i have to manually refresh it to show the data that was enter.
Hope you can help and I'll explain this as well as I can but I've put it in general as it's a culmination of things.
I have written a call monitoring database for a call centre (all good so far), but they want historical searches (again all good). I've written the relevant queries for these so that the searches can be done for Adviser, Manager and also by a date range. However, they now want to be able to print out the current search from the screen.
The way I have done it is this. I have written the report be adding in a subreport and putting in the relevant historical search form, and then written a macro that is assigned to a button on the historical search form to print the current record.
The problem that I am having is that when they click on the button to give them the history they fill in the relevant advisor or manager name and the date range which gives them the info in form format but, when they click on the button to print the current 'screen' if you like, it asks for the information again. I know this is because the actual report is written from the same query but is there anyway that it will just print what's displayed on the screen? I don't do VBA so if it has to be done that way could you please display it as it should be inserted.
I do hope that that has made sense and that someone can at least help me, cos you're all wonderful and I've had some really excellent help in the past from this site.
I have VBA code for a Print Preview button on the main form that previews the current record in a separate Report using this code:
Code: Private Sub cmdPrintRecord_Click() Dim strWhere As String
If Me.Dirty Then 'Save any edits. Me.Dirty = False End If
[code]....
I use this Print Preview code on a Button in the Form Header. The Main form lists head of household information. I also have a tabbed control with three tabs that have SubForms for Address, Children and Contact details. The problem I have is that if any of the subforms are left blank I get a Run-Time Error '3021': No Current Record. If I Debug (press the button), it takes me straight to this line:
highlighted in Yellow.Anyone on my database must have an address, should have contact details and could have children. If any one of these is blank then the print preview will not work.I would like to know how to stop this error happening for blank records in my subforms.
I have a main form with a subform. The subform has linked tables from the main form. People are on the main form with the index PersonId and they are linked to incidents by IncidentId.
I want to put in two buttons.
First put a print report button for each subform whereby it will only produce a report for the records I can see on screen . i.e. if a person is linked to two incidents I just want the report for those two incidents.
Secondly I would also like a print all button on the subform where it prints reports containing the current IncidentId number.
I have been an MS Excel man all along my career and I am a novice in MS Access.I have created a table, [Initial Customer Approval] which records data from a Form, [Initial Customer Approval]. Once the data is entered in the Form, I need to do some calculations based on the data entered in some of the fields in the form.I created 6 different queries for the six possible values in those fields. now for each of those queries I created respective reports.I placed a Print command button in the Form.
1. When I press the Print button it should open the report for the current record in the Form. (Currently It Opens all the reports simulatneously, with only one relevant report containing the current record; other opened reports being blank.)
2. If user presses the Print button before pressing Save button then system should prompt user.
Here is the code (Please note [reference number] is the unique ID generated for each record entered in the tabe through form):
Private bSaveClicked As Boolean Private Sub Form_BeforeUpdate(Cancel As Integer) If Not bSaveClicked Then MsgBox "You are trying to navigate away from the active record. Please either save your changes, or press ESC to cancel your changes.", vbOKOnly + vbInformation Cancel = True