Having trouble printing after I performed a filter. Have a subform with continuous forms that I put various filters on..., however when printing, all the records print and not just what was filtered...Is there a way around this. Basically, I would like to be able to print out only the filtered records in my form view.
Max
thought this might have been easy, but no....
i want to have a form with a [DateFrom] and [DateTo] text box
you click a button, it goes to a chart and the chart is filtered between those dates (the chart has week along the x axis)
problem is, the recordsource of a chart in a report is a crosstab query and you can't put form filters into a cross tab query
have tried to ram the parameters in before opening it with
CurrentDb.QueryDefs("qry_Reporting_Charts").Parameters("DateFrom").Value = [txtFrom]
CurrentDb.QueryDefs("qry_Reporting_Charts").Parameters("DateFrom").Value = [txtTo]
DoCmd.OpenReport [cmbReports].Value, acViewPreview
but it looks like the parameters are read only or something :confused:
any ideas anyone?
thanx in advance
hi
The database XXXXX_20061018.mdb contains the form Frm_XXXXXX.
Currently this form does not show data after it has been opened.
infact of the Me.FilterOn = False.
so please give me some idea how to solve this problem
thanking you
I have a database about when computers have been installed
I have a form
It has a drop down list with Januray through to December
I want the user to select a month and a year and then click the command button and it will run a query displaying all the computers installed in the month of that year
any ideas people?
i have a form to generate report with 3 filters,
1.sales_person,
2.Client_Name,
3.Product_ID
these are combo selection and the report is working fine with these 3 filters. filtering by a query. all 3 feilds on the same table.what i am unable to do is make these filters as option to select with a check box. like if i dont want the third filter product but to generate report with the other two filters sales_person and client_name.
edt: uploading my DB Form report_generator on medical_request_query and table medical_requeset
I have a number of forms that are bound to recordsets as follows:
Dim rs As New adodb.Recordset
sqlQuery = "Select * from myTable"
rs.Open sqlQuery, sqlCNN, adOpenKeyset, adLockOptimistic
Set Me.Recordset = rs
Set rs = Nothing
In Access 2003, users could open these forms and filter on basically any field by using the right click-> Text Filters functionality.
In Access 2010, this functionality appears to work (users can apply the filter and the Toggle Filter button in the ribbon shows a filter is applied), but all of the records are still visible in the form.
Any work-around that does not involve redesigning the form to be non-recordset bound?
Is it possible to clear filters set on a subform using a button on the main form?
View 1 Replies View RelatedI have a search form with blank fields tied to a table, four criteria search boxes, and a button to take the input from the search boxes, search the table, and populate the results on the form's blank fields. As of now, it works as long as all four criteria boxes aren't null.I used filters to achieve this, and here's the code that works as long as all four boxes are not empty. (My criteria boxes are as follows: a textbox called "Keyword" and three combo boxes called HRCombo, BuildingCombo, and RoomCombo, and the fields they're tied to are as follows: "Item Description" "HR Holder" "Building" "Room") My first line "Me.Filter = ..." was broken up to make it easier to view.
Code:
Me.Filter = "[Item Description] Like " & Chr(34) & Me.Keyword & "*" & Chr(34) & "
AND [HR Holder] = '" & Me.HRCombo & "'" & " AND [Building] = '" & Me.BuildingCombo
& "'" & " AND [Room] = '" & Me.RoomCombo & "'"
Me.FilterOn = True
Me.Requery
I need it to be able to do the search no matter which combination of criteria boxes have input. Someone recommended using if statements to do the following: Create four strings, one for each criteria box. Use 4 if statements to check if the box is null - if it is null, assign an asterisk to its string, and if its not null, assign the value I used for the above Me.Filter statement to each box's string. Then, use Me.Filter and concatenate the four strings at the end. Here's the code I used for this, and, with my limited knowledge, I can't get it to work.
Code:
Dim StrA as String, StrB as String, StrC as String, StrD as String
If Me.Keyword is null then
StrA = "*"
else
StrA = [Item Description] Like " & Chr(34) & Me.Keyword & "*" & Chr(34)
End If
[code]....
Here is the environment:
Currently, I have 10 Users running a front end form that connect to back end data where they add to current records and eventually check that the record is complete.
I also have an "Apply Filter" button on the right hand side of the form that allows the user to apply filters to the records to show specific data that is not complete.
I am currently hearing that while the user is working, whether they apply filter or not, it seems as though all of a sudden, all of their completed work dissapears from their recordset hence not allowing them to go back to make changes to it if needed. I can only conclude that when a different user clicks apply filter, all users are affect some how... here are some examples of the code for the filter:
Code:
Select Case [cboFilterValues] ' Where the user selects a filter parameter from a dropdown
Case "All Data"
strSQL = "SELECT * " & _
"FROM [Data Table] " & _
"WHERE [Complete] = No
Then it does:
Code:
Me.RecordSource = strSQL
I am basically trying to find a way where only the user wanting to view the filter is affected... FYI, the other users arent actually seeing all the filters from the other user filter choice, they simply loose all their completed work from their form.
I am trying to generate a report that is based off of a query. The query has a form filter that it needs to filter the data. I keep getting a jet engine error and couple others.
The form has year, start week, and end week on it. I can get the query to work fine. When I try to open the report, Access says it doesn't recognize the " [Forms]![frmUptimeFilter]![StartWeek] " as a valid field name or expression.
I am having an issue trying to show all records when I load my form. It loads correctly when I don't have a record source for the main form. However, the combobox filters will not work. My goal is to have users be able to use the datasheet, subdatasheet and combobox filters. I can get the form to work just fine when I link the Main form and subform, but when the form opens it is filtered on the first record. I have been successful with this approach when using other forms, but they didn't require a subdatasheet.
Is there anyway I can have the comboboxes to filter yet be able to show all records until the user selects filters? Is this possible?I finally got my Manager to agree to use a database instead of Excel files based on this form setup and I need to make as "user friendly" as possible (look and function like a spreadsheet) I attached some pics of the form along with the code for the filter.
I'm trying to create a form which filters a report based off of combo boxes selected by the user. The code I'm using currently is:
Code:
DoCmd.OpenReport "rptProgramAttendees", acViewReport, , "ProgramIDFK = " & cboProgramTitle
This works great to return a report if the user selects something from the combo box. How do I adapt this so that the user can also leave the combo box blank and filter the report to return all records?Additionally, what if I want to have the user filter between dates selected on the form; i.e. between 'txtStart' and 'txtEnd'
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 4 tables and around 440 records but can only view up to 417 in the form I have designed. I have been adding new records via form and it has been added to my main table, but when i try to view it in form view - the record is not available to view. What do I need to do to correct this problem?
I have checked that there are no filters, data entry is set to No, Auto deletions, additions and edits are set to yes.
Also to mention it seems that the problem has arisen since I set up some new queries, there is a one to one relationship between the tables!
So i have made a query which filters the text you type in your text box on a form. This is working great, but then this morning I had some records that contain some blank fields. My query does not show those records even if they contain the same text that I would type in my search form.This is my expression in my query of one column:
Like [Forms]![searchform]![Qprojectomschrijving] & "*"
i have a search form with a sub form displaying the results, how can i send the results to a report to print out or just print the results?:confused:
View 5 Replies View RelatedI have a form with multiple subforms. When I hit print selected record I get a blank sheet of paper. What could be set to not allow the data or the background of the form to print?
If I just print the subform out by itsself it works good. However when I have the main form open then try to print I get blank pages.
I am sure someone changed a fairly small setting, but I do not know what has been changed. Thanks.
:eek: When I go to print the form, it repeats the detail section over and over. Instead of being one page, it is 1414. How can I fix this problem? Thanks
View 4 Replies View RelatedHi
I'm pretty new to all of this. I've set up a simple database. I have a form in it for inputting information and then there is a command button on the bottom which prints out a report I've created with the information on it. This is all working great except it prints evey record and I only want the current record printed out.
I've tried the help and it goes into detail about OpenReport and PrintOut in macros. I have no idea what a macro is or what to do with it.
Can anybody please help me and give me step by step instructions as to how to print out only the current record in the report from the command button.
Your help is greatly appreciated:)
I have a form (entry screen to enter data) I then created a report in the layout I need for my order form. I want to creat a button that a user can press and it will print the current record to the report (order form layout)
Here is my current code for the print button on the form page:
Private Sub btnPrtOrderFrm_Click()
On Error GoTo Err_btnPrtOrderFrm_Click
Dim stDocName As String
stDocName = "rptOrders2"
DoCmd.OpenReport stDocName, acNormal
Exit_btnPrtOrderFrm_Click:
Exit Sub
Err_btnPrtOrderFrm_Click:
MsgBox Err.Description
Resume Exit_btnPrtOrderFrm_Click
End Sub
The only problem is when I tell it to print if I am on record number 2 on the form, it prints both record 1 and record 2. I only want the current record i am in to print. Any ideas much appreciated
Dean
Hello all- New here and working with a database for my boss. I did not create this rather am modifying it. I have a table (vehs) that contains information for three different departments regarding their vehicles. This database also has a form that prints (when clicked once) all of this data to the local printer. I need to make three sub forms to print similarly but just by department number (in other words only department 1's vehicle data) I'm not too big an access guru so if I need to supply any more data please let me know
Thanks,
John
I had made my own database for my own business.
I am trying to print a report from a form. Once i enter an order detail i finish off by printing a letter. At the moment we are doing this via a query by entering the order id.
I want to automate this so for the form record i am in i want a button to print a report for that record only.
I know this can be done as i rember doing this in college but i cant get my head round it at the moment.
Please help
After having designed a series of forms, I have just been told that users would like to occasionally print the data.
On testing this, it seems that the data does not print onto 1 page.
Are there any settings to fit data to 1 page wide only?
Aternatively, is there a better way of doing this? Perhaps by using a report or something like that?
The form has a whole load of calculated fields (calculated control boxes with expressions) so would I run into any problems doing it ths way ?
Thanks.
I created a form that opens to a blank form. I also have a print button on the form. I want to be able to print the blank form, but nothing happens unless the primary key has a value in it. Is there a way to print just a blank form? I have been working at this problem for a few weeks. Please help!
View 1 Replies View RelatedHow do you setup the form to default print to a legal size paper?
View 3 Replies View RelatedI have a bound form that I created. I want to be able to print a blank form. When I click on my print button, nothing happens. Also, when I click on the print icon, I get the following error:
PCL XL error
Subsystem: KERNEL
Error: IllegalStreamHeader
Operator: 0x0
Position: 0
Here is my code for the print button that I created:
Private Sub cmdPrint_Click()
On Error GoTo Err_cmdPrint_Click
DoCmd.PrintOut , Me.CurrentRecord, Me.CurrentRecord
Exit_cmdPrint_Click:
Exit Sub
Err_cmdPrint_Click:
MsgBox Err.Description
Resume Exit_cmdPrint_Click
End Sub
Am I using the wrong code? I really need to be able to print a blank form!