Modules & VBA :: Printing Multiple Reports At Once
Dec 19, 2014
I want to print mulitple reports with different content based on a query. It is like printing invoices of different customers based on a date selection at once / automated..Current I have it working so that I have to select 1 customer at the time.
I was having trouble just setting each report with a particular print method - for some reason they just kept forgetting their individual settings and resorting to default on the machine.
This meant reports were printing on the wrong paper, or the wrong size paper, the wrong orientation and some times refusing to print if it couldn't find the paper (which is useful in runtime as it doesn't display error messages)
So I used Reports(rpt).printer properties (I forgot where I found this) to hard code the printer properties into each print command... this meant I had to use another function to insert the variables.
So all I had to do was say:
Code: PrintMe("Invoice","InvoiceID",iID)
and a report would print to exactly how I wanted... but it's just too slow!
See attached for full code, I have a niggling feeling it may be the function: PrinterOK, to make sure the printer exists or not.
Code: Function PrinterOK(sPrinterName As String) As Boolean Dim MyPrinter As Printer PrinterOK = False For Each MyPrinter In Printers If MyPrinter.DeviceName = sPrinterName Then PrinterOK = True Exit Function End If Next End Function
I know it's the printing code, because if I stop the printing and just preview then it shows up almost instantly.
I have a report that prints per customer. Is there a way to do a print all such that all the cusomer reports are printed without having to manually print each one ??
How to do this? trick is that these reports are all the same report being fed different data, opened and closed using VBA. In between the closing and opening the data gets changed. Best approach is?
Hello Here's the problem: I'd like to print multiple reports using a button in a form. I guess I could use something like that: DoCmd.OpenReport "report1", acNormal DoCmd.OpenReport "report2", acNormal DoCmd.OpenReport "report3", acNormal DoCmd.OpenReport "report4", acNormal etc in the command.click sub but here's the tricky section: Some of my reports (they are all based in select queries) do not contain data. How can I make access print only these forms that include records ? For example if the query that provides records to the "report2" returns nothing, I would like on the commabd click event mentioned above, only the report1,3and 4 to be printed. Am I asking too much?Hope you guys understand what I'm talking about. Sorry , if my English isn't too good Thank you in advance
Our access database keep track of children attending an after-school music programme.
Each week we print registers and give them to the class teachers for them to mark who is coming. The registers are produced as a report, grouped by School then by Class.
We run 3 times a week so each week I need to print off 3 copies of the registers for each class.
Is there a way to print multiple copies of each group in a report? This would save me quite a bit of time each week.
My report has tens of pages and I need to save each page as separate file with ID as filename. PDF prints with ID but all in one file. I use this code.
Option Compare Database Private Sub tisk() Dim cesta As String Dim kod As String Dim Sql As String Dim rs As Recordset
Currently I have five separate reports setup in Access 2010 (that are running off of five separate queries). Since they have different data/fields, I was unable to combine into one query & one report.
However, I print each to PDF and then combine using Acrobat Pro. Is there a way to combine in VBA and not have to do the step using Acrobat Pro?Function PrintReports()
I have a class roster and need vba code to print a first day package of forms. I want them to print each person's package then move on to the next person until the roster has printed each person's package.
Body (pre filled with "Dear ([Contact]if possible) Please find enclosed your documentation for your recent telephone order bla bla bla and our logo.jpg if possible)
then i would like to attach to the email the cover letter/invoice(report), book page(report) and the book (pdf) from the hard drive (r.eports changed to pdf)
if i can press a button on the form to send it that would be good.
if i could link it to a query to send a batch of them that would excellent.
The Database is Named: b4s.mdb The table is called: Main Table The input form is called: Client The letter/invoice report is called: b4sletinv The Book page report: b4sbook The pdf book is located at c:Documents and SettingsAdministrator4sfinal.pdf The query for the batch is called: coverlet&proforma
Hey all, I have a problem I was hoping that someone could help me with. I am trying to add my digital signature to my report. Since I have added an activeX Control to my form which display and stores my signauture, I would like to display it on my report as well (if it apperas with the record) So I added it like any other control to the report but when it is saved it is letters and numbers, so I have to make it back into a digital signature. Can anyone help me.Thanks
hi. i am working first time with query and reports. i have created a database. i have reports and query. i have a button in my form by the name of (View reports) if a user clicks on that button it opens another form with 3 options 1) Problems all report 2) problems resolved 3) Problems not resolved Now what i really want is when a user clicks on Problems all report it should go directly into excel worksheet based on my query which i have assigned and the width, column should be perfect in excel so then a user can print. secondly same thing goes for problems resolved based on my query which wil show all the problems which have been resolved and should open it in excel with everything alligned and ready to print. i know it is possible and i have been able to just print Problems all based on report not with my query and the formatting was really bad. i need to print reports based on my query directly in Excel worksheet with everything perfectly formatted. any help will be really appreciated. Thanks alot
I've created a pretty powerful Access Database that pulls information out of some ODBC tables we have on our local server. Of course, I created the database and all the forms and reports on my work computer here. But, when I was finished, I sent that entire database out to probably 20 or 30 people in the company. On a daily basis, they run the same program from their own computer and they like to print/export/etc. the reports that are produced. However, I don't understand why those reports print our on my personal printer (the printer is on the network). If they have a default printer at their site, why wouldn't it print there? Also, I haven't included any printing macros or VBA coding. I'm tired of having 30 or 40 sheets of paper print out on my printer daily. Any suggestions?
Not sure why this is doing this. When I print out my report, it will print most of the items, and leave some out. When I go back and check the information is in the database correctly, but it wont print out.
I have a report where the detail section, holding 4 subreports, takes up 5 inches in the middle of the page between the header and footer. We want the entire 5 x 8 area enclosed in a box on every page. I have tried to achieve this by putting a line in the Detail_Format section:
Code: boxDetail.Height = 5 * 1440 * Pages
However, when I run the report, I get pages 1/3 correctly, then 2/3 and 3/3 with no detail section or box, and then pages 4/3, 5/3, and 6/3 with blank detail sections and no box. If it's a 1-page report, the same - page 1/1 is perfect and page 2/1 is blank, no data and no box. I also sometimes (but not always) get overflow errors from the Detail_Format event.
I know it's not a margin error because that would be every other page, and the page count wouldn't be doing that. (Still, I have scrupulously checked every margin, and they all look fine.) Getting this look on the report is a priority. Any way to achieve the same result with the box without causing the missing data and extra pages?
I have a report with one sub-report. It previews correctly and prints correctly from my ACCDB. However, when I create an ACCDE, the sub-report previews correctly and then does not print. I have tried the following and none work: In the main report, deleted the links and changed the subreports record source.
Changed layout for print to no Changed filter on empty matches to no
Moved everything from detail to page header.When I put code in the subreport to set a flag when loaded and queried that flag in the main report, the subreport never admitted to being loaded when run from the ACCDE (again works fine from the ACCDB).
I'd like to print out a report so that each record should be printed into an individual pdf file. When printing manually, record by record, I use an app called cuteprinter for converting reports into pdf. But that one needs saving path for each individual pdf file. What could I do if I'd like to make a series of record printing? Would there be a way of automatic generating path and file name for each record's print?
I have to join multiple values into a string for summarizing data on reports and exports. This process in vba is taking up to 10 minutes to process and will get worse as the size of these reports grow.
My method so far is to query the individual items into a recordset, loop through the values, adding them to the string then return the string in the query.
Here is an example:
Public Function SO_Description(intSO As Integer) As String Dim db As DAO.Database Dim rs As DAO.Recordset Dim strSQLSelect As String SO_Description = "Profiles: " Set db = CurrentDb
I have limited users to not show the ribbon, but I need them to be able to print of reports or export them as pdf files how do I give them access only to do this ?
I have an application where I have some users in the field with tablets and they deliver a package and the receiver will sign for it (like UPS or FedEx essentially). They sign my application and then the application saves the signature to a SQL Database in binary data. I'm using the Microsoft InkPicture ActiveX control to achieve this. After they sign, I have a line of code that equals:
Me.RecBySignature = Me.RecBySig.Ink.Save
This works fine and I can also recall the signature to the form when the form is re-opened.how to do is to put the signature on a report. Is there a way to "draw" the signature on the report? Or to print it to the screen?
I am trying to have a macro button so when I click it it Emails to a particular person but also prints off a copy.it all works fine but for some reason it wont print the image off, my macro is as below
On the report I use the group function on a field called assemble part number and select no duplicates in the property field . so I don't get that part number on every line below that group.
When I print the report it gives me the assembly part number on every line can the report be printed without it on every line just the group line.