Reports :: Writing VB Code To Loop Through A List Box And Create Separate PDFs
Aug 19, 2015
I have a sales report that I generate each week based on a query, which relies on the input from a combo box on a form. This works great - but I have select each salesperson, one at a time and run their reports separately.
I'd like to have some code that will run through each person on the list, generate their report, create the PDF, and email (or save) the file.From my initial research, it appears I will need to utilize a List Box (vs a combo box), so I can select multiple salespersons for the report.
I've found a few examples of code to use...but a little lost on how to implement. I create a new form with a list box that queries the property table for the list. I then added a button to execute the code, and attempted to add this (with my control and reports names substituted). Getting all sorts of errors -- so not sure I'm on the correct path.
'Posted by ADezii 5.23.2009 on bytes.com
'Modified by Gina Whipp 11.4.2009 to OutputTo Multiple Files
'Tested in Access 2003 with a Combo Box
Dim intCounter As Integer
Dim cboCode As ComboBox
Set cboCode = Me![ YourControl ]
'If Your Data Type is Numeric use this section
[code]...
View Replies
ADVERTISEMENT
Jul 5, 2013
I have a spread sheet which on a per line basis contains columns whose cells contain the path to a file. It looks as if many of the files are tif, pdf, word and excel etc, so multiple file types.
Writing a routine which would take each row and then for each line of file paths turn them into one multi-page document - pdf or something?
View 1 Replies
View Related
Apr 13, 2013
I have a query which displays only the records that match the criteria in the form given before. Now i want to create separate report for each of these records. How should i go about with it? I don't want a seperate form for this purpose, is there any way to do the same with a macro?
View 1 Replies
View Related
Nov 21, 2014
I want to be able to take two separate queries to create a 2 line graph. Also to be able to spice the graphs up some. The ones I have done, single line, even seems dull.
View 7 Replies
View Related
Aug 30, 2013
I've created a custom ribbon and it works great however I want to create a separate ribbon and attach it to the report. On this particular ribbon, I'd like the export to excel, export to word and print functions to appear ONLY for reports. Not all reports will need to be exported; it depends what the user does. I've created this XML and I'm not receiving any error message. It loads as expected but my group is blank/empty. Still confused.
View 2 Replies
View Related
Nov 16, 2014
I some code that is reading the first 32 lines of a text file and paste the results into 1 text box on individual lines. I would like each line to go into an individual text box.
I have 32 text boxes named txt_1, txt_2, txt_3
I have a variable named ThisLine holding the line of the text file.
I have a variable named textBoxName holding the name of the control.
Need to putting these together to write the line to a text box .
Code:
Sub ReadFile()
Me.txt_newData = ""
Me.txt_OrigData = ""
'again, we need this strange thing to exist so that ...
Dim fso As New FileSystemObject
[Code] .....
View 1 Replies
View Related
Feb 6, 2015
I have several reports that creates price sheets for all of my customers. It is a report with multiple subreports within, and I am trying to create a process to seperate them and export them all into [Customer Name].pdf. I have tried to scrap some code together from various forums, and it has been unsuccessful.
For example, one of the reports "rptPriceSheetQuarterly", has a field "txtCustomerName", that feeds the queries for the other subreports. I would like to create a new PDF when that field changes.
I understand I need some sort of looping code that will cut the report up dump them all into one folder, but I am totally out of my element here.
View 14 Replies
View Related
Aug 31, 2014
I have a report that has a group sort and page break after each area. What I'd like to do is export each area as it's own individual PDF report (preferably as an automated process).
View 3 Replies
View Related
Mar 11, 2014
we are moving from Access 2003 to 2013 using Windows 8.1 64bits. We used Leban's code and library to create and merge pdfs. C
Creating pdfs can be done with built-in functionality in Access 2013. But I can't find a way of merging pdfs. I've tried Leban's Dlls files but I am getting run-time error: "File not found:StrStorage.dll" do I need to do something extra to make Leban's code work on Windows 8 64bits ?
View 8 Replies
View Related
Jul 19, 2013
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.
View 14 Replies
View Related
Mar 15, 2006
This was to dumb to write in the title. But when I am trying to write a code, the drop down, only stays down for a few seconds. Does that mean I am doing something wrong. I am trying to learn to write, but I am about sharp as marble, when it comes to writing.
Any Ideas
As usual
Many thanks
View 3 Replies
View Related
Sep 6, 2006
Hello all
Further to an earlier post asking how to check if forms were open ...
I have a form EditCompanyForm which pops up to let people edit the details of a company. The form can be opened from one of three forms.
When the EditCompanyForm is closed I want to update the form that opened it.
So I have this rather ungainly bit of code.
__________________________________________________ ___________
Private Sub Form_Unload(Cancel As Integer)
Dim oAccessObject As AccessObject
Dim FormName As String
FormName = "CompaniesForm"
Set oAccessObject = CurrentProject.AllForms(FormName)
If oAccessObject.IsLoaded Then
Form_CompaniesForm.Requery
End If
Dim oAccessObject1 As AccessObject
Dim FormName1 As String
FormName1 = "CompaniesCallForm"
Set oAccessObject1 = CurrentProject.AllForms(FormName1)
If oAccessObject1.IsLoaded Then
Form_CompaniesCallForm.Requery
End If
Dim oAccessObject2 As AccessObject
Dim FormName2 As String
FormName2 = "CallListForm"
Set oAccessObject2 = CurrentProject.AllForms(FormName2)
If oAccessObject2.IsLoaded Then
Form_CallListForm.Requery
End If
End Sub
__________________________________________________ _
Do I need 3 separate AccessObjects?
Should I be using ... Set oAccessOjbect = nothing ... at the end?
Is there a more elegant way of doing this?
Thanks for any insights.
View 4 Replies
View Related
May 31, 2006
Hi
I have three fields on the form. First one is Combo box - "Contact person", Second - "Code" is Text field, Third - "Department" is the text field. Corresponding to this I have a table "Department "with fields Contact person, Code, Department.
I want that when I select the Name from the combo box, corresponding records like Code and Department should appear in the respective text box.
Help me in writing this code.
Thanks in Advance Very much
Deepak
View 1 Replies
View Related
May 31, 2006
Hi
I have three fields on the form. First one is Combo box - "Contact person", Second - "Code" is Text field, Third - "Department" is the text field. Corresponding to this I have a table "Department "with fields Contact person, Code, Department.
I want that when I select the Name from the combo box, corresponding records like Code and Department should appear in the respective text box.
Help me in writing this code.
Thanks in Advance Very much
Deepak
View 1 Replies
View Related
May 31, 2006
Hi
I have three fields on the form. First one is Combo box - "Contact person", Second - "Code" is Text field, Third - "Department" is the text field. Corresponding to this I have a table "Department "with fields Contact person, Code, Department.
I want that when I select the Name from the combo box, corresponding records like Code and Department should appear in the respective text box.
Help me in writing this code.
Thanks in Advance Very much
Deepak
View 2 Replies
View Related
May 31, 2006
Hi
I have three fields on the form. First one is Combo box - "Contact person", Second - "Code" is Text field, Third - "Department" is the text field. Corresponding to this I have a table "Department "with fields Contact person, Code, Department.
I want that when I select the Name from the combo box, corresponding records like Code and Department should appear in the respective text box.
Help me in writing this code.
Thanks in Advance Very much
Deepak
View 1 Replies
View Related
Nov 23, 2013
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.
View 4 Replies
View Related
Aug 19, 2014
I have a continuous form that displays a list of invoices (frmInvoiceList) based on an adjustable filter contained within the form. I have the filters working the way that I want them through VBa and I have a button on each record to open a report (rptInvoice). Inside that report, I have some controls to "print", "email", and "export to PDF". Again all that works just the way I want. The Form and the Report are based on a different query and each has an InvoiceID field to link.
What I am trying to do is put the Print, Email, and Export buttons on the main form which would perform the appropriate action for all the records that are displayed on the form. I've been able to get the Print function to work to a degree. It will print all the records, but it changes the background colors based on the alternating records. When I go to Email or Export, it creates a single file with multiple pages and each page is a new record, again with the alternating background colors.
Ideally, I would like to have a separate file exported for each record that can be renamed and archived separately. I'm not so concerned with the email function but if it would be possible to generate a separate report for each invoice, then pull the appropriate email address for the record, that would be really nice.
I've tried some "for" and "do" loops that I found through some Googling but none of the samples ended up working like I wanted.
View 10 Replies
View Related
Jan 14, 2014
Access 2007-10
Listbox created: List62 (I know I need to rename it, but for now)
Multi-select: Extended
Row Source Type: Field List
Row Source: qryFieldList
Open Query: qrySelectedFields (I added primary key to first column, just to have at least one destination field).
Goal: to select multiple fields within listbox, click on command button to open query "qrySelectedFields" with selected fields from list box.This is the code I have on the command_click:
Dim varItem As Variant
Dim strSQL As String
If Me.List62.ItemsSelected.Count = 0 Then
MsgBox "Please select one or more fields.", vbExclamation, "Healthcare REIT"
Me.List62.SetFocus
End If
[code]....
It does absolutely nothing - doesn't add the fields to "qrySelectedFields", doesn't open the query, notta.
View 8 Replies
View Related
Oct 1, 2013
creating a small loop to run code.For each record from AREA with PLANTPROGRAMID = VARIABLE Then...In this example, my table is called Area, my field is called plantprogramid, and my variable is defined earlier in code.
View 5 Replies
View Related
May 15, 2015
I want to make delay, for example 2 minutes when the code is within the loop.
Example
Code:
For i = 0 To 100
Debug.Print i
'Before go to the next to make the delay
Next
View 12 Replies
View Related
Jul 1, 2013
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()
DoCmd.OpenReport "Program_Summary_1", acViewPreview
DoCmd.OutputTo acOutputReport, "Program_Summary_1", "PDFFormat(*.pdf)", "C:DesktopPrintFiles" & "Program_Summary_1" & ".pdf", False
DoCmd.Close acReport, "Program_Summary_1"
DoCmd.OpenReport "Program_Summary_2, acViewPreview
[code]......
View 3 Replies
View Related
Dec 12, 2006
I have a large database of Purchase Orders
Orders can be placed by people in one of 4 departments
I would like to automatically make 4 separate databases (so each department can access their own) from the master
Is there a way to do this?
View 4 Replies
View Related
Oct 25, 2013
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
Can ignore the query part. It is working fine.
View 4 Replies
View Related
Dec 27, 2007
All,
I have a quick question that could lead into a longer one.
First off, I am trying to associate tests with a course a student is enrolled in. Would it be better to add a column in the courses table and have a comma separated list of all tests associated with each course or would it be better to create a separate table that has a column for the course and another column for the associated test with that course?
If comma separated fields would be better, how would I handle that in forms? How does one parse that field?
Thanks!
View 6 Replies
View Related
Mar 10, 2008
I have a form, frmSub, that contains the combo box comProducts. I also have two tables, Products and PurchaseDetail. Both tables have the field ProductID.
I want comProducts to create a new record in the Products table, using the input in a field called Product and then to use the value of ProductID to create a new record in the PurchaseDetail table. Ie, so the PurchaseDetail table has a record that links to another record in the Products table via the feild ProductID.
I hope I was semi-clear.
View 4 Replies
View Related