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 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 need to create a report for each employee in my company of all compensation information. The report is going to need to have multiple detail sections on the report for example to list all benefits specific to the employee and all beneficiaries.
I tried using a subreport to produce those detail sections that I needed but once I placed this subreport inside a box on the main report each detail I created increased the size of the box. I also thought about making the detail section a list box and writing all of the information there. Would there be a better or easy way to accomplish this?
I am also thinking I am going to have to save all of this information in a table and based the report on that table?
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 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 set up a database that holds wedding list details for our shop. The product images are not held in the database itself - I have linked to them using VBA as outlined in the microsoft access help pages.
Now I can print a report absoluely fine, but I can't capture the report to send as an email to wedding guests. A snapshot isn't good enough as I don't want our customers having to download software. I thought maybe I could export the report to Word and then email that as an attachment. However, when I export the report, there are no images in the resulting Word document.
Does anyone have any ideas? I primarily need ease of use for the customers picking up the email at the other end.
I am using Access 2000, Windows XP and Groupwise 6.5. I am trying to email an employee leave report using the SendObject method. I would like to use the SnapShot format. Must I save the report before I send it? I tried acFormatSNP with no success. Thanks for all your help.
Access 2000 Wondering if there is anyway to setup a report to automatically run and e-mail out at a certain time each day? I currently have a button on a form, based on a macro, that when clicked, will e-mail the report to a certain user. Just wondering if there is anyway to set it to send at a certain time, without having to open the database and manually run it.
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.
Well im close to putting my DB into action, but I'd like to have a form that will show a list of queries and reports where they can be selected and emailed. I would like to be able to choose one or many files. I have created the email module and its working fine, I just thought I could make it a bit easier to send multipule reports with the click of a button. I just can't find a way to list all my queries/reports in a dropdown list. Can someone send me a suggestion on how to do this if posible.. Thanks in advance.
I have a table, each row contains information that I want email out as a pdf.
I've created a report, and at the moment I've created a button embedded with the onscreen report which emails the report I'm actually looking at onscreen (as an attachment), all the button is doing is event-on click running this VBA code...
Code: DoCmd.SendObject acSendReport, "rptSalesReceiptMain_UK", acFormatPDF, DLookup("[Email]", "[Sales]", "[PrintInvoice]=True"), , , "VAT Receipt for your order", "As requested, please find your VAT sales receipt attached"
...it all works, but it's very manual....because I have to open up each report manually, & then click the button manually to create the email
Since I have the main 'chunky' parts done (i.e. creating the report & the code that emails it when I click a button), I'm now turning my attention to automating.
I'd like to add a new true/false column to my table "Receipt Emailed" (or similar) & have a bit of VBA hunt down the column, then it comes across a false condition, it runs the report & emails it.
Therefore rather than me opening the report & clicking on the button (which runs vba code), how do I get this done automatically?
I have limited access knowledge and everything I learned about access was from youtube videos and reading online. I have only used the features that do not require coding/programming (tables/queries/reports).
this is my problem. I am the secretary of a social boat club (about 300 members) in charge of producing invoices. I created a my member table with general data, applied a query to create a Dues&Fees Table and then I created an Invoice report from this table..etc. Right now I have a final report, with 300 invoices that i could easily print and mail. However, people are asking to have their invoice emailed and I was wondering if there is a way to mass email each individual invoice to each individual member of the club.
I am using access 2010...and i have a form with a combobox on it...and in that combobox shows a list of employees names. When i currently select the name of the person that i want, it creates their own individual report of their workload.What I want to do is to be able to select that person and it generates their individual report and then attaches it in an email to that individual.
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 am trying to create a P&L statement in access. I know what I want to come out at the end. I am just starting to play with access and having trouble getting what I want to come out of it.
On the sales side I have a query that gathers all the revenue sources and calculates a total for each date. I then use a second query to just take out the data I want for the P&L report. I created a sub-report that displays the data I want. I use the grouping and grand total features to get the total into the report footer. So far so good.
On the expense side I created a form of a query to manage the one to many relationship to capture the data for expenses (one purchase with many line items). I created a query based of this query to get the relevant data for my expense sub-report. I created the sub-report and got everything looking and calculating the way I want it to. I use the same grouping and grand total features to display the data in the report footer. Still good.
I created a new main parent report with the two sub-reports (sales & expenses) on it and even was able to pull the totals from the sub-reports into the main (so currently the subtotals of the two sub-reports are displayed twice). Now when I try to use the textboxes I used to pull the sub-report totals into the main report to perform additional calculations (sales - expenses) I get #error. I have tried different things and gotten ?name.
Control source for the two textbox controls on the main that display correctly, but don't let me do any further calculations.
=[rptP&LExpensesOverview]![AccessTotalsAmount]
=[rptP&LSalesOverview]![AccessTotalsTotal Sales]
To do the subtraction I have tried using the references above, as well as just using the names of the unbound text boxes in the report that bring the totals into the main report.
As a work around, I tried to build one query with all the data from sales and expenses, but can't "filter" based on date and get the data I want in the query results because the two sets of data are not necessarily related. I either get a long list of records, or no records (I am currently only playing with about 5 days of data).
I have a switchboard form with a left menu bar similar to windows explore wi th three sections (Configure, Tasks, Print) How can I have each section collapsible like in window explore?
Can it be done through the VBA scripting in MS Access? If so can someone pro vided examples?
Basically I divided each section to three parts one part is the header which is an image and a label (name of section) the second part is the button to click to hide/show the context of the secti on the third part is the text (labels that open other forms) with a background image
something like this http://www.viksoe.dk/code/collapsiblepanel.htm http://www.viksoe.dk/code/screensho..psiblepanel.gif
I'm trying to do a new membership database for a local group who take monetary subscriptions. Basically, there's a form for creating a new member, with a few tabs - Contact Info, Payment Info, and one other.
Basically, in the payment tab, i've got a dropo down box to select the individual package from a packages table, another to select the payment term (Monthly, Annually), and a final one to select the payment method. Now in there i've got a list of possible payment methods: Cash, Cheque, Credit/Debit Card, Direct Debit. Now obviouslly, each payment method is going to have different requirememnts for what info the club actually needs. Cash simply needs amount of payment and date of payment. Cheque needs payment amount, payment date, cheque details. Card is obviously going to need the CC number, Valid & Expiry Date, Card Type, CCV Number, etc.
So basically, i want to be able to have the relevant section display when that payment method is selected from the Payment Method drop-down box. What's the easiet way of doing this? Could i create another tab-set inside the payment tab, and then only display the one tab relevant to the selected method?
Request from the higher ups to have several expandable sections in a form. Ideally only the title of the section would show, like when using a DAP, then the user could click and expand out the section and enter data. I tried the Tab option, but they are set on an expansion section.
