Report Says No Current Record When In Print Preview
Aug 25, 2015Report says 'No Current Record' when viewing with print preview, even though it works fine in report view?What did I do?
View RepliesReport says 'No Current Record' when viewing with print preview, even though it works fine in report view?What did I do?
View RepliesI 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:
Code:
varAge = DateDiff("yyyy", varBirthDate, Now)
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 button on a FORM to print the current record with the following code:
DoCmd.RunCommand acCmdSelectRecord
DoCmd.PrintOut acSelection
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 created from a table that contains item information.
I have a sub form linked to a different table that contains records.
Each item has multiple records associated with it, so for example 1 record on the main form could have 10 records displayed in the sub form.
Example: Main Form :
Item | Units | Serial Number
Thermometer1 | DegC | 123456
Sub Form:
Item | Date | Actual Measurement | Unit Reading
Thermometer1 | 01/01/15 | 25 DegC | 24 DegC
Thermometer1 | 01/01/14 | 25 DegC | 23 DegC
Thermometer1 | 01/01/13 | 25 DegC | 24 DegC
Thermometer1 | 01/01/12 | 25 DegC | 26 DegC
Thermometer1 | 01/01/11 | 25 DegC | 25 DegC
I want to be able to print preview a report based on 1 record record selected in the subform. So using the example above i'd like to print the record on say 01/01/13 as a report that contains all the information from the item table and only the information on the 01/01/13 from the record table.
I have an unbound form with an associated report. When the user hits the 'print' button on the form/screen, the report is launched in the background. In the On Load event of the report I populate the report fields from the forms field as so:
Code:
Me.txtAddrMainLine2 = "NAME " & UCase([Forms]![frm_OrderRx].[txtPatientName])
This works like a charm as long as I call the report in Print Preview mode (i.e. with acViewPreview). But if I send the report directly to the printer, none of the fields print.
I've read about using other report events to populate the fields (e.g., On Format and On Print) and also something about using TempVars to pass the data. But I haven't read anything that's clear and definitive about the full answer.
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?
View 1 Replies View RelatedI'm having hard trouble doing print preview current record from form with subform to a report.
When using the code below I'm getting an error for:
The specified field [PolicyNum] could refer to more than 1 table listed in the from clause of your sql statement.
Dim strDocName As String
Dim strLinkCriteria As String
strDocName = "rptCurrentInfo"
strLinkCriteria = "[PolicyNum] = Forms![frmAdjusterMod]![PolicyNum]"
DoCmd.OpenReport strDocName, acViewPreview, , strLinkCriteria
Command button is in the main form frmadjustermod - sbfm is sbfmMoreMod
foreign key is PolicyNum
Thanks,
Michael
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.
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 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 report based on a form and when I view the report in print preview, part of it has been truncated. I have attached a screenshot of it. Is there a better way for me to print the form other than as a report? If not, how do I show the entire report without leaving out any part of it?
Thanks a lot
I have the following code in the On Format Event of the report. It is used to hide duplicates which result from very loose Where parameters when I run Docmd.OpenReport. With tighter Where parameters there are no Duplicates.
I am aware that the On Format event does not fire and I am to use the On Paint event. However, the On Paint Event seems very limited. It does not have a Cancel and most code that i tried does not work.
Code:
Private strLastGen As String 'Report Module Variable
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
'If a duplicate Generator
If Me.GeneratorNumber & Me.GeneratorName = strLastGen Then
Cancel = True
End If
' Save the Gen Num of this record
strLastGen = Me.GeneratorNumber & Me.GeneratorName
End Sub
I have built a new DB in Access 2010 to manage computer inventory for multiple 'agencies'. I built a report that pulls table info based on which agency is selected. I created a popup form that has a lookup combo box for all agencies, once the agency is selected, hit a button and the report opens up in print preview mode from a macro embedded into the form (I'm not very familiar with VBA anymore, but I am willing to learn), only problem is it opens up behind three other forms within the database (my switchboards for various forms and reports).
I have popup set to yes for all forms (so I can hide the ribbon), modal is set to no. The only way I can get the report to have focus on top is to set the popup to yes, but then I don't have the print preview buttons to print the darn thing.
I am having an issue with viewing a report. I have a button set up to show the print preview of the report. There is a chart based on the report's record source, and two sub-reports showing related data. The print preview section however shows the the chart area where it would appear is blank, i.e. there is a white area where the chart should go. There is no error message. The two sub-reports appear correctly. If I go to print the report, however, the chart appears, and it will also appear if I change the view type (e.g. to layout and back again).
View 7 Replies View RelatedI have report that i have in preview. In that report i have ribbon that has buttons close and print. Close works fine, with print it goes ok but when "printer selection" comes, i try to change printer it informs that not enough memory. All this code that is in ribbon buttons is in VBA.
What could be the reason for memory stuff or how could this be made that this inform wouldn't come.
Code below:
Sub EnnakkoMyButtonCallbackOnAction(control As IRibbonControl)
Select Case control.ID
Case "MyBtn1"
DoCmd.OpenReport "Tuotanto Ennakko", acViewPreview
[Code] ....
I'm posting this question to Forms forum because I'm sure I can't do this with a report--though a report is really what I need to be using.
My database has buttons on the forms to preview a "page printout" report based on the data in the record displayed. The reports - formatted to closely resemble printed questionnaires provided by the client - are based on queries, run with criteria conditions to match the record on the screen. So, to run the report, you have to have queriable data -- i.e. the data shown in the form has to have been saved to table. So the print preview buttons include a Save command.
The client would like to be able to view the printout of a potential new (or changed) record without saving. (There is an audit trail that tracks changes and deletions once a record has been saved.) The only way I can think of that this might be done would be to print directly off of the form--which would produce un-pretty results at best, I'm afraid, and seems like a headache to set up. But would it even work? Using the file menu to preview printout of a form seems to save the record.
So, my questions:
1. Is there something I'm missing such that I could run the reports without saving the data?
2. If I DID print out the form instead of the report, can even THAT be done without saving the record? (They would only need to preview without saving, not actually print.)
I added a "print preview" button to a report that does just that, shows the print preview. The issue I'm having is that I can't do anything in Access after I click that button. Everything in Access seems to stop working, I can't click on anything with my mouse. the only thing that does anything is that i can move the report up and down with the up/down/left/right keys. If I click on a different application that isn't Access (i.e. excel, spotify, email, etc.) and then go back to it, everything works fine.
View 4 Replies View RelatedI would like to show a report's print preview in a sub form. Is there any possible way? I don't want the user to see the datasheet view of the table so I decided to put on a report.
View 1 Replies View RelatedI have always noticed that when creating a report, when you make a paragraph using a label, the alignment and size of the text/paragraph is always different when you preview the report than when you design it.
This makes alignment of paragraphs tricky, especially when you are trying to insert a bold faced word into the middle of a block of text by using a separate label.
I am using Access 2000
I've seen this question asked in multiple places but do not understand the answers (yet). I haven't worked with the ribbon and XML before.
I'm able to turn off the navigation panel and the ribbon completely which gives the user a nice, empty screen. However, when reports are selected, they open up in Print Preview but the ribbon doesn't return with the Print Preview.
In short, how do I get the Print Preview ribbon to return when generating a report?
Access 2013.
I have a report which is accessed via a hyperlink in a form. I have the default view for the report set to Print Preview yet everytime I click the link the report opens in report view which I don't want.
The event for the hyperlink is as follows:
Private Sub cmdPrint_Click()
Dim strWhere As String
If Me.Dirty Then 'Save any edits.
Me.Dirty = False
End If
[Code] .....
I have tried changing "acViewPreview" to "acViewReport" and "acViewNormal" and each time it is either going straight to print or opening in report view. I just want the report to open in print preview mode so I can decide if to print a hard copy or send to pdf.
I have created a report with a subreport for my database. The user selects the project for which he/she wants to see a report. Once the project is selected, the report is displayed in a popup window and maximized in the print preview layout. This allows the user to view and read the report. Once this is done, there are no buttons or menus on the screen that allows the user to send the report to a printer or file.
Other than the report, there are minimize / maximize and close buttons at the top right of the window and page selection buttons at the bottom left of the window. If the user wants to print the report, they must either hit ctrl-P or right click the mouse on the screen to display a menu from which the user can select print to open a print dialog box. Is there any way to add a button or menu to the print preview that appears on the screen to make printing easier?
I have a report with quite a few subreports in it. There are a number of calculated fields on the form, most of which use Dlookup to retrieve at least one of the figures required for the calculation. The Dlookup runs fine and the report opens but the calculated fields are devoid of data in Report view. When I switch to Print Preview view the fields are now populated. Below are two variations of the DLookup syntax I have used to try and alleviate this issue.
=DLookUp("[8]","qry_MonthlyTotalsByYearFirstAid","[ActivityType] = 'First Aid Injury (FAC) Reported in Safeguard'")/[sub_AllHours].[Report].[8]
=DLookUp("[8]","qry_MonthlyTotalsByYearFirstAid","[ActivityType] = 'First Aid Injury (FAC) Reported in Safeguard'")/[Reports]![rpt_AllFigures]![sub_AllHours]![8]
Note that the field [8] specified here is simply a month number and forms a column in the crosstab query for the corresponding query name.
I would add the query referred to in the DLookup to the source query for the report but the source report's data is derived from a Crosstab query, which only accepts one data field (Access terms this as the value field.
In Access I have created a button to print a preview prior to printing document it is entitle "NoVeteranMain" which works fine. Except I want it to save my document prior to printing preview how would I do it. If not after I edit it I have to re-save it prior to hitting button which generates print preview.
This is code that is generate upon click
Private Sub NoVet_Click()
DoCmd.OpenReport "NoVeteranMain", acViewPreview, , "ClientID = " & Me.ClientID
End Sub
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
[code]...
I have a form titled "Search by Contract # - Active". I tried adding a command button to print the current form. I created a report called "Active Contract" ro carry out this function. To open the form the user must enter a contract number to view the record. This is what I want the form to do. However, when I try to print the record from my command I'm getting an error. why it won't pull up the report?
View 1 Replies View Related