Modules & VBA :: Print Preview Report Based On Subform Record
Jan 26, 2015
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.
View Replies
ADVERTISEMENT
Jan 25, 2014
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:
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.
View 11 Replies
View Related
Jun 19, 2013
I 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 Related
Aug 25, 2015
Report says 'No Current Record' when viewing with print preview, even though it works fine in report view?What did I do?
View 10 Replies
View Related
May 25, 2013
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.
View 3 Replies
View Related
Aug 27, 2004
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
View 6 Replies
View Related
Jun 2, 2014
I have a report with several forms, these are all graphs.
In order to fit them all on one report, I need them to be able to grow.
This works fine in Report View, they grow as expected, however when exporting to PDF, printing or print preview, they do not grow. I set them all to Yes for Can Grow and it displays correctly in Report View.
View 2 Replies
View Related
Mar 13, 2013
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
View 6 Replies
View Related
Apr 11, 2013
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.
View 2 Replies
View Related
Aug 21, 2014
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 Related
Jul 3, 2014
I 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] ....
View 5 Replies
View Related
May 15, 2006
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.)
View 3 Replies
View Related
Jun 14, 2015
I have a problem printing a Subform that uses multiple criteria(in textboxes) as filters.
The search portion of the form works fine. The problem is I have created a report based on the subform and am using the following code to open/filter the report
Code:
Private Sub PrintBtn_Click()
Dim strCriterion As String
Dim strMsg As String, strTitle As String
[Code].....
View 3 Replies
View Related
Jun 13, 2013
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 Related
Jan 12, 2015
I 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
View 4 Replies
View Related
May 12, 2015
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.
View 2 Replies
View Related
Aug 7, 2014
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.
View 10 Replies
View Related
Dec 22, 2013
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?
View 4 Replies
View Related
Jun 25, 2013
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.
View 4 Replies
View Related
Apr 8, 2014
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
View 5 Replies
View Related
Jun 5, 2014
i have created a MultiSearch query witch puts my results in a list box.under it i have created a button wich i want to use to print a report with the criteria i select from my list box if there is more than one result.
Following is the Code i used for my button
On Error GoTo Err_Command60_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "ReportLable"
stLinkCriteria = "[ProductID]=" & Me![SearchResults]
DoCmd.OpenReport stDocName, , , stLinkCriteria
Exit_Command60_Click:
Exit Sub
Err_Command60_Click:
MsgBox Err.Description
Resume Exit_Command60_Click
Every time u press the button i get a message syntax error(missing Operator) in query expression
Now i have not used any code in my Query except for
Like "*" & [forms]![frmSearchFor]![SrchText] & "*"
Where i made the error
View 3 Replies
View Related
Sep 11, 2013
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.
View 2 Replies
View Related
Jun 20, 2014
I am trying to add a record through a form, and then get that last record and print it via a simple report.
I keep getting debug when I run it. My add record sub works fine, but the dlookup doesn't work when I put the add record sub in.
Private Sub addRecord()
On Error GoTo errHandling
'INSERT CODE
Dim dbOpenTrades As DAO.Database
Dim rstTrades As DAO.Recordset
[Code] .....
View 1 Replies
View Related
Jul 11, 2013
I am still trying to get a hang of development in access 2010.
I would like to design a form with a listbox or a combobox which holds all 8 of my reports (a table has all the reports), with a Print and a Preview view buttons. In addition, the user must be able to select if they want to view the report by month, quarter and the year in question.
How do i have a specific report print or previewed based on the value selected in the listbox or combobox and the date criteria.
View 4 Replies
View Related
Jul 25, 2013
I have a piece of code that I'm using to display an image on a report based on a path saved to each record. the code is:
Code:
Option Compare Database
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If IsNull(Me.ImagePath) Then
Me.ImgPic.Picture = "O:BellinghamIntranetProductionLabelsNo Label.bmp"
Else
Me.ImgPic.Picture = Me.ImagePath
End If
End Sub
It seems like every few months the code crashes access and then never works again. When I debug, the part that is highlighted is:
Code:
Me.ImgPic.Picture = Me.ImagePath
The only way i've found to correct it is to delete the report and the module and copy them back in from a backup database. What could be causing this code to crash or how to stabalize my database to prevent this from happening again.
View 14 Replies
View Related
Jul 22, 2014
I have a modal form which has a single record which is then linked to a sub-form on the same modal form. This all works fine and shows the relevant record and sub records but I want the modal form main record to change dependant on the record selected in the subform (which is basically order item history.
I found some code on another site which seemed to work for others but for me I am getting Run-time error 2465 and it doesn't like my reference to 'Me' - is this because it is a modal form?The code I am using is:
Public Function GotoRecord(RecordID As Long)
Dim rst As DAO.Recordset
Dim strCriteria As String
Set rst = Me.RecordsetClone
strCriteria = "ID = " & RecordID
rst.FindFirst strCriteria
If rst.NoMatch = False Then
Me.Bookmark = rst.Bookmark
[code]....
View 1 Replies
View Related
