I have devolved two reports which receive their data from the same query. I could not fit everything in one report as I am limited by Access’ 22 inch limitation. I would like to enable a user to run the reports off a Macro. The report/query requires the user to enter a “Parameter Value” such as date and facility number. When running the Macro it requires the user to input the same “Parameter Values” twice, once for each report. What I would like the Macro to do is only request the Parameter Values once. Is there a simple way to achieve this? Thanks for any assistance.
I have a button in a Form which on being clicked runs a Macro containing the action of opening a parameter query. When this Macro is run, the optition to enter data into the parameter query is shown and providing a user enters valid data, there is no problem.
However, if the user cancels the action at this point (by clicking the Cancel button etc.), he is shown an "Action Failed" box with the optition to "Halt".
Whilst this does work, I imagine there is a more elelgant solution for catching & dealing with a "cancelled by user" response.
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.
What I want to do is save a daily report to a map source, each day the map name changes so for today the map name is "Report2013-10-03", and tomorrow the map name will be "Report2013-10-04".
Is this possible? is there some function like save(Report%s) where %s = date() ?
I want to sent out my report as a pdf file with my macro.. I've been trying to use the VBA
Code: Option Compare Database
Sub Fix1() DoCmd.SendObject acSendReport, "MarketRiskControl_HighestDiffs_AsOfCurrentDate", "PDFFormat(*.pdf)", "my mail@mail", "cc", , "SD Counterparty Report as of Current Date", "Regards, Trading Risk Control", False End Sub
I have a report in which a textbox generates numerical values and letter values. I want to...On report load - if textbox = numbers then hide otherwise show if it contains letter values.
I am facing an issue The Custom Macro Stopped report from rendering. I have report which is having two sub reports inside. The report is opening in the report view properly but when the ExportWithFormating macro runs, it throws this error.
I have a simple parameter form where the users enter selectives for their queries. They usually want the top 100 records, but would like to select the number of records from that same form. I tried adding the forms' field name into the top records field in the query but it will take only a number. Any suggestions about setting it form the form or using VBA?
BACKGROUND: I have a query, in which the user decides a customer name. According to the customer name a specific custom price is chosen for the customer from tblInputProductSpecs. Based on this I do the following calculation Total Price:[Price]*[Quantity], where the quantity is already known.
PROBLEM: Since the Total Price is total price for a specific product. I wanted to calculate the TOTAL of all the Total Price/Product. But finding it really hard to do this. I tried to do Total:SUM([Total Price]), but this doesn't work. I get an error. I even tried Total Price:SUM([Price]*[Quantity]), but this also doesn't work. Is there any possible way to find this TOTAL?
I would really appreciate your help with this frustrating problem.
I currently require a macro that takes the record and when clicked, it opens a form and displays this record. This is so that I can use it to click buttons and open existing reports based on the data and field that match the 'clicked' record.
I am trying to alter this parameter to bring back all records if either beginningsalesrange or ending salesrange is left blank. I can't quite get it right.
Between [forms]![frmState]![BeginningSalesRange] And [Forms]![frmState]![EndingSalesRange]
This error occurs at the OutputTo line. This code is part of an user form with a button “save as PDF”. When this code is run, the report is visible as an example (as meant to be) on the screen. The code stops at the OutputTo line.
When I use DoCmd.OutputTo acOutputReport, StrReport, acFormatPDF, StrDocumentName,, False the problem still exists.
I tried to save the report manually by Preview > Export > PDF. The preview is OK, saving as PDF results in the same error 2501. This may lead to the conclusion that this problem is not caused by the VBA code.
I verified whether user write rights are OK, and whether a default printer is available. Both are OK. The report consists of 1 page. When this very same application is used with Access 2010, everything functions as expected.
I have a query set up which needs to have different criteria at run time depending on values selected by the user. If no option is specified, I need to pick up all records with 'Nulls' in them else, if date is specified by user, I need to pick up all records with date > than specified date. The query is able to pick up the date value from an unbound text box in the form. I used the same field in the form and populated "Is Null" in the field and it does not work. How do I pass this as a paramater to the query from the form? Is there a way around without setting up 2 sets of queries and reports?
I am using MS Access 2010 to export data into MS Excel 2010 spreadsheets.
I am just wondering: Is there a way to set the Parameter value for the query via VBA?
For example: There are 10 regional managers. When I click a button on a form, 10 sets of data per manager are going to be exported into Excel spreadsheets.
I have created a saved query named [For exporting] with a parameter [Manager Name] for the field [Master Table].[Manager].
The VBA for the button has 2 subs: 1) Sub 1 for the loop for 10 managers
Code: ... strQuery = "SELECT DISTINCT [Master Table].[Manager] FROM [Master Table] WHERE ((([Master Table].[Manager]) Is Not Null));" Set rstStores = CurrentDb.OpenRecordset(strQuery)
I have a text box in a report, with it's control source property set to =[BegDt]. Upon loading the report a message box pops up and asks the user for the value of [begDt]. This occurs 3 more times for 3 other parameters.
Now I want to change the design of the report so I decided to put these 4 parameters on a form so the user can fill in the 4 values all at once rather than responding to 4 message boxes that pop up when you run the report.
The problem is now the control source properties in all the different text boxes need to be changed to [forms]![frmABC]![txtBegDt] etc.etc. There are over 100 text boxes in this report that make reference to the 4 different parameters. Is there a replace command I can use to change all the occurrences in the text boxes or perhaps a simpler way would be to pass the values to the report through code.
I tried placing this in the report header's format event and it doesn't seem to have any effect.
Code:Private Sub ReportHeader_Format(Cancel As Integer, FormatCount As Integer)begytd = [Forms]![frmABC]![txtStDt]endytd = [Forms]![frmABC]![txtEndDt]curmo = [Forms]![frmABC]![cboMo]curyr = [Forms]![frmABC]![cboYr]End Sub
I should mention that the report uses a table (tblRecap) as it's record source. I tried using a query that refers back to the form for the parameter values but that means I have to use the query as the reports record source and that creates a problem because the report needs fields from the table to perform calculations.
I am trying to get calculated fields in my report to work but zero values in the data are throwing up #Div/0! and #Error! and #Num!
The main data fields I am trying to work with are:
VehicleReading PreviousReading VehicleLitres
My aim is to track mileage and consumption for a fleet of vehicles and show daily and weekly averages in mileage and consumption and then to flag 20% increase in consumption.
I have a calculated field in my report named Kilometers,
= [VehicleReading]-[PreviousReading]
and also a calculated field named Consumption,
=[Kilometers]/[VehicleLitres]
My sum and average calculation fields in the group footers are only working where there are values above zero in the Kilometer and VehicleLitres and Consumption fields.
In reality there are some days where there has been no travel, so some records will have a zero for the Kilometers field and there are also days when there has been no refueling so there is a zero for the VehicleLitres field.
I have tried using the expression builder to create an IIf function but to no avail.
I have tried copying the syntax suggested by the Expression builder:
Hi. I have a problem but not sure if I can do what I want to. I have 7 daily reports that are based on different queries but want to be able to print all 7 at the same time using only one command button, but I also want to be able to have all seven run using a week commencing date entered into a parameter or something similar when the print button is pressed.
I have a report based on a query with a between two dates parameter (Begin date and end date). This parameter is fed from a form. All works well - query, form and report. My question is can the date parameter appear on the report header so users know the report was based on a start date of 1/1/2008 and an end date of 1//2009 for example?
I have a report with field that has as a control source this value " =[Time Period In Days?]"
This works well as long as the user enters a value and clicks on "OK", however if the user clicks on "Cancel" he gets an error.
I assume that this is because the report is trying to open and it gets a null value from this message box? Is so, how can I ensure that a default value of "0" is automatically entered?
I am trying to create a report, filtered on a combo box(txtname).This combo box is having a list of names.I have one query(mainquery) based on a single table(maintbl).I created a blank form(GenerateReport) with abovementioned combo box(txtname) and a simple button, which will open a simple report.In mainquery, under names column i am defining the criteria:
[Forms]![GenerateReport]![txtname]
Report is being filtered accurately.But when I open query i receive error 'Enter parameter Value'
I have a command button that opens a report.In one of my reports, this macro works:
Code: ="[eEmployeeID]=" & [eEmployeeID]
However, in another command button that should open another report, the code below does not seem to work:
Code: ="[echEmployeeID]=" & [eEmployeeID]
It just keeps giving me errors saying that there's a mismatch, etc. The field in my report that holds Employee ID is named echEmployeeID. If I write this code:
Code: ="[echEmployeeID]=" & "[eEmployeeID]"
it sort of works, but Access asks me to enter parameter value first before executing the where condition. I already tried to change [echEmployeeID] to [eEmployeeID] both in the source table, and the report but it just doesn't work.
I have an append query that currently looks like this URL...This query automatically adds the machine parameters for a product code and lot number into the running condition log. This is so the user does not have to manually go in and tediously select each machine parameter.
The running condition log also has a date field to specify what day and record number the machine parameter's value was recorded on. When I run the query the appended rows look like this. The product and lot are defined by user parameter and there are actually about 36 machine parameters
Code: Productstockcode LotNo Day Record Parameter ActualCond PE-500 130816m71 StockTemp PE-500 130816m71 Zone 1 PE-500 130816m71 Zone 2
My question is: how do I modify the query to automatically add the date and record number in one shot? It needs to be user defined at the time of the query because this data is not stored anywhere else in the database. For each 36 machine parameters the day and record would be the same.
I have two forms one simple and another sub form located in simple form and connected to query where query has parameters, while opening the simple form the sub form require the parameter values. Question is here how I can make the sub form like when I open the simple form the sub form must be disabled (not request me for parameter values) and make a button in simple form to activate the sub form and then request me the parameter values.
I have searched and searched for a thread before posting this, there are some discussions on related issues, but I could not find a solution. This is my problem:
I have a table with Incident_Type (a total of 6 selections from a combo-box), Incident_date, Incident_SubArea(25 selections from a combo-box), a check box for IsStaff_reported and all these are recorded by Incident_ID.
I have created a monthly report based on a parameter query that prompts for start and end dates using a custom form for incidents.
Now I need parameter (again start and end dates) cross-tab queries for number of incidents (i.e. count of Incident_ID) that are 1. IsStaff_reported, and 2. Not IsStaff_reported. to show up in a single report.
I dont know if that is too much to ask for or is there a simple way to accomplish this. Any help is appreciated.
