Forms :: Continuous Form Filter By Month Or Age
Feb 9, 2014
I have a continuous Form named frmBirthdays that lists People with a [DateOfBirth] field.
In the Form Header I have 2 Unbound Combo Boxes 1- cboMonthFilter which list the 12 Months of the year in Text NOT Number and 2- CboAgeFilter that has a list of Ages 0 -30 (which is all i require) and a Clear Filter Command Button.
I would like to be able to filter the people list by cboMonthFilter for anyone that has a Birthday in any given month.
OR
I would also like to filter the people in the list by their age.
But never both at the same time.
View Replies
ADVERTISEMENT
May 16, 2013
combo boxes and continuous forms.I have a continuous form (works great), with two combo boxes that navigate (rather than limit/ filter the list) to the desired selection.One for suburb and one for postcode.
I have expanded the select criteria for the suburb to include postcode as some suburb names are used in more than one state. (I do not want to have to select a state, then suburb).I changed the column count to see the postcode next to the suburb, however when the selection is made only the first instance is selected.
Example.
Epping 2121
Epping 3076
If I chose Epping 3076, Epping 2121 is selected and the continuous form navigates to that suburb (rather than the one with 3076).Can I change this so that I can still search by postcode, or search by suburb and have the form navigate to the corrected suburb postcode combination?
View 5 Replies
View Related
Jul 28, 2015
I've built a basic inventory management system that allows a business to add products and the ingredients (and labour etc.) that go into them so they can work out costs and profit.We've run into a bit of a usability problem in the sense that they have 700 different ingredients and so adding them to products has become a little unwieldy as the lists in the comboboxs are massive.
What they've asked me to do is to add a filter combobox to the Ingredients subform of their New Product page that allows them to constrain the Ingredients by type, to make the lists more manageable. So if you imagine they are entering a record for a new cake and need to add Eggs as an ingredient they could either...
a) Scroll through the list of 700 ingredients as they do currently and find "Size 3 chicken egg".
...or...
b) Use a combobox on the ingredient row to pick "Eggs" which would in turn filter the ingredients combobox on that row from 700 ingredients down to a handful e.g."Size 1 chicken egg", "Size 2 chicken egg", "Size 3 chicken egg", "Size 1 duck egg" etc.
the filter combobox applies to all rows in the subform! Is there a clever way of telling the Filter to only apply itself to the current row of the continuous form?My code is...
Code:
Private Sub FilterRMs()
Dim mySql As String
If Me.RMTypeFilter.Column(1) = "999" Then
Me.FilterOn = False
code]....
View 2 Replies
View Related
Mar 3, 2014
I have almost completed creating a continuous form which I want users to be able to filter though the records based on to/from date, badgenum and a response string.
I then want to have a button, btnSelect, that will select the remaining records and open a report based off only the remaining records.
1.) Everything on the continuous form works except when trying to filter a combo box, cboBadge, field name "BadgeNum". BadgeNum is data type "short text". I have modified the code below from the following Allen Browne link. It keeps throwing a debug on me.Filter = strWhere at the bottom of the btnFilter sub.
2.) As far as the btnSelect and printing remaining records, I guess I'm not sure where to start.. I currently have another print button that will print individual records only which works fine.
[URL] ....
Code:
Private Sub btnFilter_Click()
Dim strWhere As String 'The criteria string.
Dim lngLen As Long 'Length of the criteria string to append to.
Const conJetDate = "#mm/dd/yyyy#" 'The format expected for dates in a JET query string.
[Code] ....
View 4 Replies
View Related
Sep 9, 2014
I've got a continuous form that displays my massive 3,000+ inventory, with the option to filter down to specific categories. Some categories have 5 items, others have hundreds. The design I have used makes it look really tacky once I filter down to one of the categories that has 5 items, because there is no scroll bar.
What I've tried using is:
Code:
If Me.RecordsetClone.RecordCount < 10 Then
Me.Scrollbars = 2 'vertical only
Else
Me.Scrollbars = 2
End If
But it still doesn't display correctly (nobar.png). This is probably my biggest headache right now, and every "solution" I've found, doesn't work.
View 11 Replies
View Related
May 4, 2015
I'd like the user to be able to search a subform only by month and year. We have lots of reports with different days, but none of them are pertinent to searching.
I don't mind if it looks a little bit messy (such as using the calendar drop down and it discounting the day) but I'd like to have it all in one box, preferably where the user can just select ex. 05/2013 and it would filter the subform, showing only reports from that month.
View 6 Replies
View Related
May 10, 2005
Hi
I'd like to be able to filter a form (fed by an underlying query) by using a toggle button setup on the form itself. My simplistic pseudo-code would go something like this.
Default state
List all records where DateRemoved is Null.
Toggle state
List all reocrds where DateRemoved is NotNull.
Can anyone kindly assist.
Many thanks
View 1 Replies
View Related
May 27, 2015
On my continuous form, I have a field that is a checkbox. I would like to place an unbound checkbox/radiobutton in the form header so that when the it is checked, it will display only records that are checked, and when it is unchecked, it will only display records that are unchecked.
View 2 Replies
View Related
Apr 30, 2015
I am running access 2007 and have a continuous form that I am trying to filter. The table that I am pulling the data from has the following fields: Order_Date, Order_number, Model.
I want to filter based on Order_Date.
I tried creating an "after update" Macro builder on my combo box and using "Apply Filter" but I cannot seem to get my syntax right.
Filter is the name of my combo box
Here is my current setup:
Filter Name:
Where Condition: [Order_Date] Like [Filter]
Control Name:
However whenever I select a new date from my combo box it asks me to "Enter Parameter Value" for Filter, which I don't understand because my combo box name is Filter. I would think they would link up.
View 5 Replies
View Related
Mar 6, 2015
I'm trying to sort and filter a continuous form. Sort ascending and filters works perfectly fine. But my descending button doesn't work. I basically have a combo box which contains a field list. Then two buttons (asc. and desc.), then a text box for filter, a button to filter, and another button to reset filter. Here's my code:
Code:
Private Sub cmdAscending_Click()
If IsNull(Me.cboField) Then
MsgBox "Please choose a field.", vbOKOnly, "No field to sort."
Else
Me.OrderBy = Me.cboField
Me.OrderByOn = True
[Code] ....
View 8 Replies
View Related
Aug 1, 2013
I have placed a filter button on a form as a filter and written the following on-click event procedure:
DoCmd.SetWarnings False
DoCmd.RunCommand acCmdApplyFilterSort
Me.Filter = "ACCOUNT_DO_NOT_EMAIL = 'HS'"
Me.FilterOn = True
When I click the filter button I get a blank message box titled 'Microsoft Access" and an OK button, when closed the filter works perfectly.I have checked this procedure in other forms and it works without showing the blank message box.The only difference with this form is that its control source is a union query.
View 10 Replies
View Related
May 29, 2015
I have a bound continuous tabular form,However, based on data content in one field of a record, I want a checkbox in the same record enabled, so the user can check it if necessary. I have created a record set using the form as shown below, and I am looping through each record. To show that my code is referring to the field with required data content, I display it as a message box and it works, yet my checkbox does not enable.
I have the code in the form_load event, however, for testing purposes I have it behind a button.If I am seeing this properly, the code behind the button enables the checkbox for ALL records once the criteria in the required field is true, and based on the last record, which has no data content, it disables the checkbox in ALL records. I also have the PK ID for each record hidden in the form. Can I utilize that to target the checkbox of each individual record??
Form Detail
-Form does not allow additions or deletions. Edits allowed
-All fields are disabled and locked
-I only want the check box to unlock if data is found in the "RequiredField" as referred to below. I have also tried if not isNull(requiredfield.value) then -enable checkbox, which yields the same results
Here is my code
Code:
Dim rstMyForm As DAO.Recordset
Set rstMyForm = Forms!MyForm.Form.Recordset
rstMyForm.MoveFirst
Do While Not rstMyForm.EOF
If Not RequiredField.Value = "" Then
[code]...
View 14 Replies
View Related
Aug 9, 2007
I need to filter in a query for only dates in a certain month/year combination.
User selectable.
For example they will enter 8/2007 to get everything for August 2007, etc.
Is this possible to do?
View 1 Replies
View Related
Jul 23, 2013
I want to use buttons on a form to change the sort order on a continuous form. In the buttons click event I am using a public function (named Sort_1) to change the sort order. The first element of the event call is the name of a generic query (named Sort_1_Query1) and the query field to sort (LAST_NAME OR FRIST_NAME, depending on the button.)This is the Click Statement.
=Sort_1("Sort_1_Query1","LAST_NAME")
This is the Public Function
Public Function Sort_1(SortName As String, FieldName1 As String)
DoCmd.ApplyFilter SortName, FieldName1 & "between 'A' and 'Z'"
End Function
I think the problem is in the use of quotation marks or trying to pass the query field name to the Do Command or the use of an ampersand.
View 4 Replies
View Related
Jul 30, 2014
I have a continuous form in which I put a command button for each record called "detail". I would like to click on the "detail" button and make it open another form containing all (and only) the info on this record.
At first I refused to use an "id" to link both forms, but finally I added the "id" in the table... however still does not work.
continuous form: "04 - GASTOS_BUSQUEDA"
id field on continuous form: "Gastid"
pop-up (details) form: "GASTOS_EDITAR"
id on pop-up (details) form: "editar_id"
This is what I have tried on the "click" properties of the "details" button field (called "btn_editgs"):
1)
DoCmd.OpenForm "GASTOS_EDITAR", acNormal, , "[editar_id] = " & Me.Gastid
2)
DoCmd.OpenForm "GASTOS_EDITAR", , , "[editar_id]=" & Me.Gastid
3)
stLinkCriteria = "[editar_id]=" & Me![Gastid]
DoCmd.OpenForm "GASTOS_EDITAR", , , stLinkCriteria
4)
Private Sub btn_editgs_Click()
On Error GoTo btn_editgs_Click_Err
Dim strWhere As String
strWhere = "[editar_id] = " & Me.Gastid
DoCmd.OpenForm "GASTOS_EDITAR", , , strWhere
btn_editgs_Click_Exit:
Exit Sub
btn_editgs_Click_Err:
MsgBox Error$
Resume btn_editgs_Click_Exit
End Sub
View 9 Replies
View Related
Oct 4, 2013
I have a continuous form that displays all my customers .I want to be able to dble click a customers ID and go to there customer details form.
View 14 Replies
View Related
Aug 22, 2014
How to populate the parent form's PK to multiple records in a child subform set to a default view continuous form?
In other words, how to auto populate the primary key to multiple records displayed the subform?
View 5 Replies
View Related
Feb 11, 2014
I am trying to use this code to filter a continuous subform based on two criteria but getting a data type mismatch error.
It works fine if I filter by just one or another. Perhaps it is not possible
Code:
Dim intSpouseEntityID As Integer
intSpouseEntityID = Nz(DLookup("[EntityID]", "qryEntitiesLocations", "[ContactIDNumber] =" & Me.Spouse), 0)
If intSpouseEntityID > 0 And Not IsNull(Me.subformContactsHomeAddress.Form.EntityID) Then
MsgBox ("There are two spouse addresses please delete one and try again")
DoCmd.Save
DoCmd.OpenForm "frmContactAddresses", , , "EntityID=" & Me.txtEntityID Or "EntityID =" & intSpouseEntityID
End If
View 2 Replies
View Related
Jul 19, 2013
I have a continuous form sfrmAddress which is based on my table tblAddressList. What I am trying to achieve concerns the date fields DateFrom and DateTo.
DateFrom is a bound text box txtDateFrom
I am trying to put an IIf function in the Control Source of unbound text box txtDateTo
=IIf([txtDateFrom]=[qryAddressHistory1]![LatestFromDate],Date(),[tblAddressList]![DateTo])
qryAddressHistory1 returns the LatestFromDate , so the most recent address.
The idea being if it is their most recent address, they have lived there until today, if it is not their most recent address it will display the date contained in the table (when they moved out or DateTo).
I have tried this a few different ways, double and triple checked my references and I'm usually OK with IIf so I don't understand where it's going wrong!
I should add I'm getting the #Name? error all the way down the column when I open the form.
View 3 Replies
View Related
Apr 5, 2014
I have the following code that is intended to use the three fields obtained from a record on a continuous form and display the details of the record on a single form. I have not used the findfirst method because I am having enormous problems with it. Instead I am defining a query based on the recordsource of the continuous form. This sql query gives one record as result and that record is to be used as recordsource by the single form.
Code:
Public Sub SboxSelectForm(ForName, ParName, QryName)
On Error GoTo NotFound
Debug.Print "SelectForm ForName="; ForName; " ParName="; ParName; " QryName="; QryName
Dim ResultQy As String, F As Form, P As Form
Dim db As DAO.Database
Dim Prsc As DAO.Recordset, Frsc As DAO.Recordset
[code]....
View 5 Replies
View Related
Oct 24, 2013
I have a listbox which contains a list of schools. I would like the user to be able to select 1 or all the records from that list box. From that list of selected records, my goal is to allow the user to use each school selected and use that as a record source for a continous form so I can allow the user to input a integer next to it, like school size.
Example:
Listbox (Schools)
ID, Name
1, Thomas School
2, Jefferson School
3, Washington School
4, Madison School
5, Franklink School
User select Thomas, Washington and Madison
In a Continuous Form it would list,
Thomas School, Text Box (Allow User to input School Size)
Washington School, Text Box (Allow User to input School Size)
Madison School, Text Box (Allow User to input School Size)
I then would save those records into a table.
View 6 Replies
View Related
Mar 25, 2014
I have a continuous form in my database that depending on the criteria used will display any number of records. Each record has a check box so the user can select a record for printing. Quite often the user wants to select all of the checkboxes.
Is there a way to do that in vba off of a command button.
View 7 Replies
View Related
Nov 2, 2013
I have a command button as a field in a continuous subform which is based on a table. I click it and it opens a report. I need the report to be filtered by the ID of said record and not to show all the records.
View 3 Replies
View Related
Mar 21, 2015
I am probably quite wrong but I am trying to apply a filter that returns all dates within the current month
The bulk of the filter is from Microsoft Access examples.
Private Sub MonthB_Click()
DoCmd.ApplyFilter , "DueDate Year([DueDate]) = Year(Now()) And Month([DueDate]) = Month(Now())"
End Sub
It is not working??
View 3 Replies
View Related
Dec 30, 2014
use a continuous form to allow users to quickly enter any number of records. One of the fields in this continuous form is an ID (not a foreign key, actually not a key in the database but crucial for other purposes) which is incremental from the last one stored in a table.
I am able to use a combo box and a query to get the ID but I cannot save the value to the text box on the first record, and then requery and get the next id when the user moves onto the next record..and so forth..
View 4 Replies
View Related
Jul 6, 2013
I have a form I would like to sort by:
first - by App_Flag (a yes/no field) - have all the clients with "yes" on top
second - by App_Date - from the earliest to the latest
The query sorts it fine but the form does not - even if I requery the form (added a requery button).
Can a macro or coding make it sort it the way I need it?
View 7 Replies
View Related
