I run a end of day report of daily sales by territory in NA. Currently I run a query to list the territories with sales then run a report for each territory listed showing their unique sales.I would like to create a macro that reviews the list of territories and then emails the report for each territory.Each territory has a macro with the report and email address loaded I just need something to execute the list.It is important that a report is not sent to territories with zero sales so just sending a report to everyone will not work.
I have a large report that generates information specific to a large list of contacts. I would like to email each contact a .pdf of their part of the report. If possible, I'd like access to run a loop and do this in one button click. I'm not even sure to begin with this.
I'm working on a project where I must send roughly a thousand individual reports to a thousand different email recipients with .pdf attachment.I know I'll need to add a table that designates the email address by SHIP_TO_CODE. Then create a form with the email subject, body, etc.. I don't neccessarily have to have the reports saved to a folder; I really just need them emailed to each account.
I was thinking I could modify the code some to accomplish my goal, but I'm not sure what to put. Maybe add a SendObject in there somewhere.CODE that I have now that saves the report to a folder. (I want to modify some to send email attachement instead)
''Module CODE:
Private Sub Form_Current() Dim rst As DAO.Recordset Set rst = CurrentDb.OpenRecordset("SELECT DISTINCT [SHIP_TO_CODE] FROM [qryWty&PendingData];", dbOpenSnapshot) Do While Not rst.EOF strRptFilter = "[SHIP_TO_CODE] = " & Chr(34) & rst![SHIP_TO_CODE] & Chr(34) DoCmd.OutputTo acOutputReport, "rptDraft", acFormatPDF, "C:UsersmrutherfordDesktopASC Daily Reports" & "" & rst![SHIP_TO_CODE] & ".pdf"
I'm a student It's just my first time to program in MS access and my project requires to automatically send email reports from MS Access...how can i do it??
I apologies for this thread, I was desperately attempting to avoid the need to post for help, especially as this is a much discussed subject. However, after three days of reading hundreds of threads and searching the web (not to mention winding the wife up) I am more confused than ever.
So, please bear with me, I have tried but everything I've attempted so far has failed.
My query centres around multiple e-mailing. I have a table from which a query runs. The query is called QryAddressBookEmail. The query will bring back anywhere from ten to thirty plus results, dependant upon the search parameters entered. From the query results I would like to e-mail each record. The email address is contained in the query field Email.
I'll be using Outlook Express for the emailing.
Rather than sending each e-mail separately I would prefer if they went as one, (IE Pete@..... , Joh@.... etc) thus avoiding the 'silent email warning - confirm to send' that appears to accompany each e-mail
For the subject and body of the e-mail, if possible, I would like two fields on the form that are populated by the user. These are named 'Subject' and 'Body'.
Again, if possible, the email is to be sent by clicking a command button.
So.. in theory, the user will select their search parameters which brings them back a list of hits. They then enter their subject line and the body of the e-mail directly onto the form and then hit the command button which will send a single e-mail to all those identified.
Also........ Whilst its not essential, anticipating future developments and other peoples wants, could an option be added for the user to attach a document by providing a path for it via a field on the form?
And..... if possible and time permits. Again, anticipating other peoples questions and problems, could an alternative be provided that e-mails each record seperately.
As you've probably already guessed, my VB is limited but I will give it my best shot.
Thanks in anticipation to anyone that can help. It is appreciated the time it takes to answer SFQ's from people like me.
I have many reports that are structured differently, many are grouped by semester.
What I do now, is put a button on each grouping of the report I want to email from and use the current semester (Sem) which is also a query parameter to filter the report.
Here is my current code which works fine:
Sub EmailFromReport(rpt As Report, Optional Sem As Variant) Dim db As Database Dim qry As QueryDef Dim rs As Recordset Dim Bcc As String Dim Subject As String Set db = CurrentDb Set qry = CurrentDb.QueryDefs(rpt.RecordSource) 'set query parameters
[code]....
The problem is, I need to be able to filter these queries on other criteria besides the semester.
My first idea was to use if statements to skip the records I don't want. This is messy and the report structures are different so I run into issues when using optional parameters because not all the reports are structured the same.
The best solution I have come up with so far is using a wherefilter parameter, stripping the semi colon off the querydef sql and surrounding the sql with a qrydef.SQL = "SELECT Email1, Email2 FROM (" qrydef.SQL ") WHERE " & wherefilter.
The problem is this, changes the original query, and I can't figure out how to copy a query with db.CreateQueryDef If i do db.CreateQueryDef("tempqry",qrydefSQL), I lose the query parameters.
Is there a better way to do this? If this is the best way, how do you take an existing query and make a copy of it?
I have a database that is strictly for generating and printing work orders. Our supervisors use it to print new work orders on the fly. normally that is fine. I have the Vb to print that specific work order
what I need to create is a VB that would allow other people to create a work order that would email it to the those supervisors. email addresses will always be the same. I just dont want to send the entire report.
My database is stores information about students such as name, student number, programme, email, etc. I have a STUDENT form with this information visible.
I also have a another table and MARKS sub form that contains the details of courses completed by the student and results. I have placed the sub form in the STUDENT form and can see each student's details and a list of their courses.
I want to be able to send this information to the relevant student via email. The student should only receive his information and no one else's.
Can this be done? Do I need to create a report first? Should I be using WORD to produce the emails?
I've created an accounts package for my business using access 2003 and I'm just thinking of some time saving features.
We need to email our invoices to our clients.
Normally we print out an invoice, scan it back into the computer, save as a PDF and attach to an email manually one by one.
My package can now print to PDF (saving one step), but what I would like is to be able to print to PDF and attach to a new email (with the email address coming from the customer table) and possibly attach more than one PDF to a single email.
I know you can use
Code: DoCmd.SendObject acReport, stDocName
to send a report but I would like it as a PDF as my formatiing is lost using that code and we normally send PDFs to our clients.
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
I have a form that the user can add Work Order numbers to a text box and pass them to a listbox to collect 1 or more values. Each of which need a separate report with the labour hours for each Work Order.
I am having issues figuring out how to get it to pass them to a query or filter the reports.
I have tried many different examples and nothing seems to work.
I am trying to pass a date range parameter & an additional parameter (Type of Audit) to 6 subreports based off individual crosstab queries and housed on one Unbound Report ("rptFinal").I have an Unbound Form "frmDate" passing a date range and Type of Audit using [Start Date] and [End Date] to rptFinal with a button that simply opens the rptFinal as follows:
In each Crosstab query, I have set the parameter criteria (in both the Parameter section & the query itself) to:
[Forms]![FrmDate]![Start Date] And [Forms]![FrmDate]![End Date] and also, [Forms]![FrmDate]![Enter Type of Audit]
On each subreports On Load Event, I have added:
Private Sub Report_Load() Me.Filter = "[DteAuditDate] BETWEEN #" & Forms!frmDate![Start Date] & "# AND #" & Forms!frmDate![End Date] & "#" Me.Filter = "[Type of Audit] = #" & Forms!frmDate![Enter Type of Audit] & "#" End Sub
and I've set the Filter On Load property to: Yes..I can open frmDate, fill in the date and Type of Audit, launch the report and it runs with no error, I have 6 blank subreports in report Preview. The headers are showing up but none of the data.
I have created a report which contains within it multiple sub-reports, which I use to generate a document for management meetings on a bi-weekly basis.
For each of these I have the subreports filtered to a unique number for consideration that period e.g. LIKE "88/00039" which relates to my data.
In order to change this I have to manually update each of the filter commands within the subreports but I assume there must be an easier 'catch-all' method of achieving this?
Ideally I'd be looking for a command prompt so I could enter just the number sequence e.g. "88/00040" and then enter this (via a corresponding macro or similar) to update the filter commands.
I have four forms named [Information Form], [Evidence Form], [Subject Form], and [Vehicle Form]. The Final Form is a Tabbed Form named [New Incident]. The tabbed form has four tabs, with each tab displaying one of the forms above. I also have a Print Command Button named [Print All] underneath the tabbed portion of the [New Incident] form.
Also, All of the four forms are set to data entry - yes, so that on open they will be clean and read for new record entry. I need the [Print All] button to do, just that, print everything that has or has not just been entered into the four forms, even if some are printed blank because they were not necessary for this particular report. One thin of note is that each form on the tab has a field for the "Incident Number" which will be the same for all four forms.
I am trying to add to a db I inherited. One of the end reports that is produced is a cost breakdown for each end user.As things stand, the data collates into individual reports which are then grouped into one file and saved via PDF. What I am trying to work out is whether or not I can selectively pick some of those reports to have more than one copy.
I see a form (within an existing form) that will list all of the end users for a particular scheme and, next to that, be a dropdown that will allow the db user to select how many copies of each report needs to be published. These will then collate merrily into one document to be saved to PDF.
I have a queries that do all the calculations and dumps the output to Query X for all different types of customers. At the moment I am required to generate a report for each of the customers and send it to them, manually.
End Goal:Initiate a Macro (at a given time at a given frequency) that would run a process to generate different reports for all different types of customers using a standard report template. I am also trying to avoid having to create a report for each customer (as the customer base grows, the report count will grow) so looking at something that would look into Query X and generate # of reports depending on number of customers.
Every month, I create 15 individual reports with each report filtered by two fields, let's say Dept and Exec. You change Dept and Exec via a combo box drop down based on a table, and this information is passed to the query behind the report. Now, I repeat this process for every report. I use an unbound form that gathers the "Title", which is the Dept Name +"Special Report"; report Date using "as of" [DATE], and an updated through [Second Date].
Each monthly set of reports is sent to a new directory and folder (i.e. M:MOR Reports2005January. This changes each month. Somehow, I'd like to automate this where each report prints with its name to a newly created folder in pdf format.
I have been reading prior posts and am coming up with some ideas like adding a "selected" field to the Dept/Exec table and then step through those selected records to determine which report you are running. It takes a long time to print these to pdf in a new directory every month.
I wanted to print multiple reports using for loop but I am not sure how to start with.
This is basically my idea:
1. Create a hidden indicator, I name it txtHidden. 2. I have one table, there are one column for "report name". 3. I have one query, filtered the "report name" column according to txtHidden, criteria written in the design view. 4. Using For loop, browse through all the existing report. 5. Every loop, txtHidden will equals to every reportItem.Name. Query will run. 6. If Query is no result, dont open report, if query returns some result, open the report.
I wanted to code something as below, but I dont know what to put in the [Dont know what to type] field...
For Each [Dont know what to type] In Access.Reports [Forms]![frmStartup]![txtHidden] =[ Dont know what to type] .Name If DCount("*", "ReportQuery", "") > 0 Then DoCmd.OpenReport [Forms]![frmStartup]![txtHidden], acViewPreview End If Next
Using one form with multiple combo boxes on the basis of which am trying to generate a report. Below is the code I've put in a command button (in Form) by which I want to generate a report....FYI - both combo boxes have text value...
how to print mutiple "invoice-records"..I want to print multiple times the same report but with different values ex. invoices (based on a query). I have the report and the queries ready but how can I automate this task?
I have seen large projects in which there are clearly several printed database reports printed out to make one booklet.
1. How does one get page numbers for multiple reports to go in sequence instead of starting over again at 1 for each report.
2. How can you add a page reference in one report to something in another report?
Do you have to do these things by hand or is there a way to create a something with auto numbering capabilities? Do you do it by importing the reports to MS Word and creating a master document?
I've been working on a database for the last month or so. It's been a slow process since I've been learning Access and VBA in the process.
But my supervisor wanted a copy of it as a progress check to send to his boss. So I sent an email with a copy of the database as an attachment.
THe email went through, but when my supervisor tried to open said email, a dialogue came up saying that Access couldn't open the file because it was "out of the intranet or on an insecure site" or something along those lines
I was just wondering what this meant and how I would be able to send my boss a copy of the database so that it can be reviewed and such. Would this require splitting it?
Sorry to drag this forum back to the nursery school but.....
We have set up a database for recording manufacturing trials. The trial details (such as date, product, nature of trial, person responsible etc) are entered into a form. At present this form is then printed and distributed for authorisation and to inform people of the trial. It would be much more convenient to be able to email the completed form to interested parties so they could review it in advance.
I have seen references to emailing tables etc from Access but do not know how it is done. Can someone explain it to me please in terms an idiot could understand!
