I want a form which allows data entry into a main table but also displays a list of records filtered from the same table. There is also an additional, calculated field displayed with the list.
The filter criteria are a date and a name, a list of which are in a separate table.They are separate fields for first and last name but i would like to filter with both and display them concatenated in the list.
This sounds like a cascading combo box issue but it isn't quite.
I filter my form using 2 unbound combo boxes which can be used in any order, both of which define text strings using case select. These strings are concatenated into a filter text and applied by a routine called in the after update event of either combo. All works well.
My question: How can I show all the filtered records in a third combo box so that users can easily select the record of interest from the filtered set?
I attempted to define SQL for each combination of the 2 comboboxes but it was getting ludicrously complicated so that got the heave ho.
After that, I attempted to use a recordset clone, but I couldn't get this to work:
'Clone record set for combo box rowsource
Dim R As Recordset
Set R = Me.RecordsetClone
R.Bookmark = Me.Bookmark
'Populate combo box with recordset
With Me![cboProjectList]
.RowSource = R
.Requery
End With
Reading the Access help, it seems that a combo box can only be populted via query, table or SQL. Is there any way of using a cloned recordset or the me.filter to show the filtered form records in a combo or list box?
I will be very grateful for any pointers.
I have a suppliers table and a products table. Two forms, Stock form with combobox to list Suppliers and a sub form with combobox that lists Products.I want to select a supplier from the Stock form and then the combobox in the subform to only list products directly sold by the Supplier.Have dabbled in SQL as follows:
SELECT Products.ProductID, Products.ProductName
FROM Suppliers INNER JOIN Products ON Suppliers.SupplierID = Products.SupplierID
WHERE ((Stocksubform.SupplierID=Stock.SupplierID))
ORDER BY Products.ProductName;
I have a form that displays records from a table.
When opened it displays all records (no selection yet).
I put would like to put 2 buttons to filter records (Male/Female).
I'm thinking of 2 possible options:
1-on click run a script that will close current form, then reopen it with selection criteria
2-directly apply a filter on the current form that would automatically refresh itself with the right records
Another (heavy, inelegant?) solution would be to create duplicates of this form. they would be loaded from separate queries that select the right records in either choice.
I've created a form with two textboxes and a listbox. What I want to do is to show in the listbox the registers filtered by the 2 textboxes. But I would like that the listbox refreshes while typping in the textboxes.It was no problem to do filtering with only one textbox. The rowsource of the listbox is a query in which I set in the criteria Like [Forms]![Form1]![Textbox1].[Text] & "*"Then I write the code for the change event of the Textbox1:
Private Sub Textbox1_Change()
Listbox1.Requery
End Sub
With this I have no problem. The problem is when using the 2 textboxes. I write the same in the criteria, Like [Forms]![Form1]![Textbox2].[Text] & "*", on another field but it doesn't work. I also write the code for the second textbox:
Private Sub Textbox2_Change()
Listbox1.Requery
End Sub
The listbox doesn't filter with both textboxes. When you type in one of them, the listbox filters from it, but when you type in the other textbox, the listbox shows the whole table filtered with the characters of the second textbox.
Once I enter records in my form and move to a new record, they won't show up in the form. For some reason there are a few records showing in the form but not all. Unsure what has happened or what I need to do to get the records showing.
If I open a the form called frmhome, I can enter information search on hours completed and even enter new towns. The table that the information gets entered into is called Crisis_support_workers. If you open this table, you will see a lot of information that has been entered. However, if you open the form that is meant to put info into that table, there is only 7 records and most of them are blank records. The form where info is entered is called Crisis_support_workers v3.
I created a split form. My main form is just a form, based off of tblBlotter. The subform is based off a query, which is the based off the same tblBlotter. (Not sure if this is proper - maybe I just need the table?)
I have a link master and link child field set to ID. When I open the form "subBlotterHistory", it opens and shows as a new record only. I want it to show ALL records on the query subform and be able to scroll up, down and edit.
Attached is a sample w bogus data.
I need to show 10 records on one form (10 customers info), and for now I have 10 subforms to do that.
Is this the way to do it?
I am currently developing a crude Contact manager database and need a quick way of entering data into a selection of records (around 1000 at a time). At the moment I am manually going through all records and changing the "DateLastEmail" field manually, which can be very tiring.
Any way to assign a button to change the field for all records to today's date or something of the like.
Currently I have a form which filters my subform. The subform resides as a seperate query and when the "Apply Filter" button is pressed it requeries with a change of .filter property, so I guess that all that needs to be done is to change all records that exist within the query, but I am stuck on a way to do this without manually entering it.
The table has PK and city column can be one of several. I need to create a filtered datasheet view (few columns only).
Since there are quite a few cities, I need to select one to display all the records in that city. My questions
Since it is a datasheet view I cannot use Combo Box. What to do then ?
If I use subform with a combo box, and bind the query in the subform with the selected combo text, it does not work.
here is the subform query
SELECT tblClient.ClientName, tblClient.HqCity FROM tblClient WHERE (((tblClient.HqCity)=[Forms]![frmSearchCity]![cboCity]));
I get nothing.....
I have a form with a subform. In the form header I have combo boxes for the user to filter data. I want to add a button that they would click to export the filtered records to a table. I have the following code and get the message that records were exported successfully but when I open the table they are not there. I don't get any errors when I compile the code but I also don't get any results in the immediate window either.
Code:
Private Sub cmdAddToTable_Click()
'Dim tmpRS As DAO.Recordset
'Dim tmpSQL As String
[code]...
Ok heres the problem, i seem to have a little bit of a mind block at the moment so help would be greratly appreciated.
Basically there are two tables involved, tblBikes (which contains all information on the bikes) and tblHires (which contains all the information about hired bikes) these are linked with a one to many relationship as each bike can be hired out many times.
I have a button on a form containing bike information which opens the hires form filtered by the bike ID of the record selected in the first form. When I add a record to the hires form i need the bikeID to be automatically input into the field.
I work at a small mental health clinic and am trying to accomplish the following.
What I have:I have one table that lists all of the patients, their phone number, address, etc.
In another table, it lists the medications that each patient takes, as well as the strength, dosage, etc.
The two tables have a relationship via the "Patient ID" column in each table.
Most patients have multiple entries in the second table, as most patients take multiple medications.
What I am attempting to accomplish:The main form in my database simply lists all the patients names in datasheet view. I want to be able to click a Patient's name, then go to a form that lists all of that patients medications. I've attached a screenshot that encapsulates precisely what I am looking to accomplish.
Since most patients take multiple medications, I need to be able to list multiple records in a single form, grouped by medication name, just like in the attached image.
I am uncertain as to how to accomplish this. I've tried using subforms but it doesn't list the data at all? Also, it looks like an Access report can create precisely what I need, but I need to have a live form that I can use to update data real-time.
Very suddenly today, when I'd done seemingly nothing, all of the records from my form that I'd built from a blank form disappeared, with the exception of the first record. When I try to just close everything down, nothing changes. When I put in a new record to the form, however, it's saved in the table. But when I save and close, the form goes back to only having the first record! This is very annoying, for easily perceivable reasons. I even tried creating the form from scratch, to see if it's some residual SQL update code acting funny, and nothing changed! It seems to work if I select a table and just create a form, though. It doesn't even work when it's a splitform and whatnot.
View 1 Replies View RelatedI have created a piece of code that filters a sub form of diary records using criteria the user has selected or entered. It was working fine when I made it a month or so ago and now is seems to be returning incorrectly filtered records, for example, I enter 2 dates to return all diary entries between the 2 dates. Yet it misses some records out that should be within the date range, and it sometimes include records that are outside the date range. I am also getting an error when I try and filter the diary entries via the supplier, "data type mismatch", here's the code that, bearing in mind, was previously working fine.
Code:
Public Function filter_diary()
Dim dbs As Database
'Dim qdf As QueryDef
Dim Sqlstr As String
Dim sqlstrwhat As String
[code]....
I have a db with a form showing all customers with communication checkbox checked, I want a button which uncheckes all chackboxes.. all I have now is a button which uncheckes the first record.. anyone an idea?
:confused:
I have the below code to reset my subform after I have filtered it using some combo boxes. One of my fields in the underlying table had a calculated field so I'd get an error when clicking the reset button. I edited the query to update the 'type' field and deleted the calculated field in the table but now get another error. The exact error is 'Run-Time error '3327' Field 'Type' is based on an expression and cannot be edited.' It appears it will not reset my form and show all records as long as this field is based on an expression.
Code:
Private Sub cmdReset_Click()
'Purpose: Clear all the search boxes in the Form Header, and show all records again.
Dim ctl As Control
'Clear all the controls in the Form Header section.
For Each ctl In Me.Section(acHeader).Controls
Select Case ctl.ControlType
[Code] ....
I have a form containing 4 text Boxes txt1, txt2, txt3 and txt4
I want
txt1 show records from table empDetail having age between 18 to 25
txt2 show records from table empDetail having age between 26 to 35
txt3 show records from table empDetail having age between 36 to 45
txt4 show records from table empDetail having age between 46 to 55
I have a form based on a query in datasheet view. What i would like is to show only those records that fulfill the truepart of iif statment, and do not show the ones that fulfill the false part.
I have the following fileds in the query
month
currency 1 checkbox
currency 2 checkbox
sum
In the form, the control named month contains the following code:
control source: =IIf([checkbox1]=no;[month];0)
So this gives the appropriate months, but also shows the all other records with a 0 in the month field. I would like to get only the records shown that are correct with the truepart of the statement.
I have an append query that appends records to a table, and I have a form based on that table.
Users will click a button that will run the append query and then open a form for users to fill in remaining empty cells. How can I filter the form to show only the newly appended records?
I have a main form [Job Quote Form 10-2205] and I am trying to add a command button to open up [Job Process Form-MKD] and have the [Job Process Form-MKD] open up and only show the records that match a certain field, in this case what I call "JobTrackNo" in the [Job Process Form-MKD]. (see attached .jpg)
This problem started to happen only recently, namely you will see that the left column under [Job Quote Form 10-2205] is blank, where normally there had been a number of fields to choose from. The fields are all still available, they are just not opening when I try to match two fields.
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've recently decided to move a database that had all its information on 1 table and divided it into multiple tables.
Attached is the relationship as well as the form.
The issue I have is that when I click the form, it only shows a blank record with none of previous records.
Data entry is already set to NO. I'm wondering if it's an issue with my relationships, tblStudioDescription is the parent table and the others are child tables so I linked them with the ID and set referential integrity.
I filter my table with a query - where the Invoiced Date is NULL. In the vba ADD RECORDS code I may INSERT new records which should then also appear - but are not showing up. The records ARE added to the table, but don't show up unless I close the form and reload it and then the query filter picks up the added records.
View 5 Replies View RelatedI'm trying to open a form with filtered criteria using this code:
Code:
DoCmd.OpenForm "Edit_Mission", acNormal, , "[Report_Date]=# " & Format(Me.Date, "dd/mm/yyyy") & "# And [Supporter_Name]='" & Me.Supporter & "'"
it used to work on access 2010 but now on access 2013 I get a blank form.
I want to open a report with the results from a filtered form.
I want to use a similar format to the attached Allene Browne search2000 as the base to filter the records initially, but not sure how to get the filtered results into a report and the most efficient way.