I want to add a series of strings to a combobox on a Form using VBA. I can add one string but how do I add more. The one I see is the last one entered, how do I add more than one string to a comboBox
View RepliesI have a form that currently uses a "catch all" table for listing available equipment to choose from for an equipment field. I call it tblEquipment. What I want to do is to make it so when I type a name in (1 of 35) in one field of the current record, the record source for the equipment field immediately looks at a different table that has equipment available only for that name. To do this I plan on making 35 different tables with limited data originally found in tblEquipment. I would call these tblEquipment1, tblEquipment2, etc. I do not use a sub form, nor do I want to.
So my questions are:
1) can this be done
2)If it can be done, how can I do it?
I have a Suppliers database which contains a form that will allow me to place orders with Suppliers.The Main form has a combo box that allows me to select the supplier. The combo box is called SupplierID with the following:
Row source: SELECT Suppliers.SupplierID, Suppliers.CompanyName FROM Suppliers ORDER BY Suppliers.CompanyName;
The subform is called Stock Subform witha combo box called ProductID with the following:
Row source: SELECT DISTINCT Products.ProductID, Products.ProductName, Suppliers.CompanyName, Products.Discontinued FROM Suppliers INNER JOIN Products ON Suppliers.SupplierID=Products.SupplierID WHERE (((Products.Discontinued)=0)) ORDER BY Products.ProductName;
Event Procedure - AfterUpdate: Private Sub ProductID_AfterUpdate()
On Error GoTo Err_ProductID_AfterUpdate
Dim strFilter As String
' Evaluate filter before it's passed to DLookup function.
strFilter = "ProductID = " & Me!ProductID
[code]..
The Link fields are done on the Purchase Order ID (PONoID).What I want to achieve is to select the supplier from the combo box (SupplierID) on the main form and then the combo box (ProductID) on the subform to filter to only show products directly supplied by the Supplier selected on the Main Form.
I have been tasked with creating a tool to analyse mobile phone bill data and present the analysis, and our recommendation, to a customers. Being new to Access (other than basic tuition) this has been a slow uphill task, which is finally nearing completion, however there is a problem which I have not yet been able to overcome.
The requirement is for the DB to open first on a splash screen (lets call it Form A) with fancy picture where our customer is selected from a combo box, the customer is then telephoned, a linked computer screen is established and our staff then click "Go" to proceed to a second form (Form B) showing an account overview and more details.
The problem I have is when "Go" is clicked, the second form loads via on click event, and even populates the correct customer in its combo box. Unfortunately that is as far as it gets - the combo does not look up the information. The customer needs to be selected again for the subforms and subreports to load with the customer overview. To clarify, form B just sits there blank until the customer is re-selcted from the combo box in form B.
I'm trying to get a combo box & button to work together. On the main form of the attached database, I just want the button to go to the associated record based off my selection (or entry) in the combo box.
I've tried the following:
- Looked through the Northwind sample database for a close example. Tried my best to replicate the functions but it didn't work
- Looked through other examples posted and tried to manipulate the code to no avail
- Tried using [Forms]![Main Form]![cmbLastName] in both the filter & criteria section of the macro
I am taking a value from one form into another. The value I am taking needs to select an item In a combo Box.
So far I can move the value to the new form but cant seem to copy the value into the combo box.
Private Sub Use_By_Date_Click()
Dim Partno As String
Partno = Me.Form.TRAN_ItemNo
TRAN_ItemNo = Partno
'MsgBox Partno
DoCmd.OpenForm "Frm_Stock_Transactions"
DoCmd.GoToRecord , , acNewRec
End Sub
This works but then I have tried:
me.Component Value = Partno
me."Frm_Stock_Transactions"."Component Value" = Partno
Form."Frm_Stock_Transactions"."Component Value" = Partno
And various combinations of the above but cant seem to get it right.
Im using the below code to open a from depending on what option is selected on a combobox.
Code:
Private Sub DirectPCombo_Click()
Dim cboVal As String
Dim stDocName As String
cboVal = Me.DirectPCombo.Value
Select Case cboVal
Case "One"
[code]....
If you select the first item [One] it will open the correct form [TestOne]. But when you select any of the others an error comes up saying that the name is no a form. So I added
Code:
DoCmd.OpenReport stDocName
But the no items would select.I know If split the reports form the forms and make two comboboxes it would work, but it would be better it both could be in the same combobox.
I have a form for adding new bookings to a database, as well as the original form for adding the passengers.
I have created a combo box on the 'add booking' form which brings a drop down of existing passengers to choose from under the 'surname' field. However it was not assigning the bookings to the passenger on the 'add passenger' table.
I changed the control source of the form property to the Customer ID (the autonumber) and the bookings now seem to be linking to the passengers. However the 'surname' box in the table is empty - if I change the control source back to 'surname' then the bookings stop linking again.
I have a combo box on a form that is liked to a table (current). That table has a list of available items and a count at the end of it. For example, apples, bananas, strawberries, blueberries, 4. Is it possible to have the combo box on the form subtract 1 from the count when an item is selected from the list? So when apple is selected the count of 4 is changed to 3.
View 4 Replies View Relatedi am looking to generate a list of dates in a combo box. I want the dates to be from 1 week ago to today. And all other attempted entries to be invalid. This means the user could only select one of those dates, with any other entry returning an error
View 5 Replies View RelatedIm having trouble filtering a combobox on a form. I have two Comboboxes, one is called (FleaTickWorming) depending on what is elected in this cobo, will deside on what is available in the other combo which is called (Product). The form is a continuous form. The filtering works, in as far as it changes the list each time, but it also deletes the item that I have chosen on previous records if the list is different. My code is as follows:
Code:
Private Sub FleaTickWorming_BeforeUpdate(Cancel As Integer)
If Me.FleaTickWorming.Column(0) = 1 Then
Me.Product.RowSource = "qry_FleaProducts"
ElseIf Me.FleaTickWorming.Column(0) = 2 Then
[code]....
I have a form that is used for data entry; from there I want to create a new form where I can select a field from a combo box which would generate the amount associated.
Example on the first form it has a Carpenter that has a calculated output of $1000, on the second form I would want to click on the combo box and pick carpenter and I would like the calculated field to be shown next to it.
I tried making an if statement on an unbound box but I found it difficult
=IIf([Combo2]=Building Service Engineer, =[Forms]![Estimate]![Text787],IIf([Combo2]=Carpenter,
=[Forms]![Estimate]![Text788],IIf([Combo2]=Custodian,
=[Forms]![Estimate]![Text789],IIf([Combo2]=Custodian - Shift Pay (5am - 6am) ,
=[Forms]![Estimate]![Text790],IIf([Combo2]=Drafting Technician,
[Code] ......
[Text787]-[Text805] are fields from the first form, these are calculated fields that multiplies wages quantity etc.
Also [Combo2] wont let me pick any data that I typed in.
I can't work out how to update the selections available in a combo box as follows: I use a combo box in a main form to select a record (yacht) If it's a new yacht then I use an event linked to a button to call another form to add the new Yacht On exiting the Yacht Maintenance form I return to the main form The combo box in the main form doesn't list the yacht i just added unless I exit and re-load the form
I'm not sure of the best way to refresh the combo box selections or main form without exiting.
I want a combo box in a form for data entry. Is the best method in doing this creating a new combo box in the form and linking it to a table, or using a lookup field in my table?
View 14 Replies View RelatedWhen I enter a combo box on a form, whatever I choose from the combo box, it populates everything. If I go to a different row to change it, it changes them all. How do I get that to stop? And why does it do that?
View 6 Replies View RelatedCan I use combo boxes placed in the detail area of a navigation form, above the sub menus but below the navigation? I am not able to get one to work properly . I can set it up but when I run the form, and try to pick an item from a list, it will not work...
View 2 Replies View RelatedI have a reservation form and I want to tick a checkbox that will filter the form based on what is in the "Reservation Status" combo box.When the checkbox is ticked, the code would remove all records that have "Complete" as a status in the "Reservation Status" combo box. The non-working code that I currently have is:
Code:
Private Sub chkHideComplete_AfterUpdate()
On Error Resume Next
If Me.chkHideComplete = True Then
Me.filter = "[ReservationStatus] = 1"
Me.FilterOn = True
[code]....
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?
I have a form with combo boxes that works beautifully, but I've been asked to add another feature to it. It requires adding a button that runs a query and displays the query results on the screen.The query code is:
Code:
SELECT DISTINCT Product.MSDS
FROM Product INNER JOIN tblStoreProducts ON Product.[ProductKey] = tblStoreProducts.[ProductKey]
WHERE (((tblStoreProducts.MaxUnits)<>0) AND (([Product.HazardKey])<>79))
GROUP BY Product.MSDS, tblStoreProducts.StoreKey
HAVING (((Product.MSDS) Is Not Null))
ORDER BY Product.MSDS;
One of the existing buttons on the form has this code behind it:
Code:
' btnHMIS_Click
Private Sub btnHMIS_Click()
On Error GoTo Err
If IsNull(Me.cboCompany) Then
[code]....
As you can see, the button is able to pass the parameters (which Company, and which Store within the company) to the report.
Code:
' btnMSDSSheetsPrint_Click
Private Sub btnMSDSSheetsPrint_Click()
On Error GoTo btnMSDSSheetsPrint_Click_Err
[code]...
How do I pass the StoreKey information into the query? Is it my query that's wrong?
I have a form that I would like to have blank fields when it is opened. I put the following in the "On Open" Event field of the form properties:
Private Sub Form_Open(Cancel As Integer)
DoCmd.GoToRecord , , acNewRec
End Sub
However, it does not work. I have an unbound combo box on the form for users to select from, in which all the records on the form will populate with whatever is selected in the unbound combo box. I thought this was the problem at first, but even if I remove that from the form, the form still opens to the first record. If I set the "Data Entry" field to "Yes" on the Data tab, that works, but then none of the fields populate when using the combo box.
I'm trying to create a Data Entry only form based on a small table called tblProject.
It consist of the fields Project_ID, Artist_ID, Project_Name, and Project_Notes.
I used the wizard to get me started and i know how to change the form to data entry only, but the problem is the vague data in the Artist_ID control. It shows up as a number, because it is an FK to another table (tblArtist) where more details on the artist are held. (including Band_Name)
I want to be able to make it a combobox with a list of the Band_Names from the tblArtist table. This would make creating "a new project" much easier.
I have a form named frmMain that contains five buttons that lead to subforms, one of which is named frmDeceased.
In frmDeceased, I needed to create a combo box that relied on selections from the combo box before it. I was able to do this successfully in frmDeceased, but then today when I opened the database and opened frmMain, I realized that the query fails when frmDeceased is opened via frmMain. It works perfectly if I just open frmDeceased directly.
The first combo box is ROHE and the second is Iwi (which is dependent on the Rohe selected).
The query for Iwi has this criteria: Forms!frmDeceased!cbo_ROHE
When I open frmDeceased through frmMain, I get the 'enter parameter value' message showing "Forms!frmDeceased!cbo_ROHE".
I tried changing this query to: Forms!frmMain!frmDeceased!cbo_ROHE, but it didn't work.
I have a Continuous form that is used to place orders in my Purchase order Database. I have a combo box with a Textbox over laid, so the users can type in the Textbox and it filters the combo box as they type. This is to search Nominal ledger codes that the current user has set up.
This has been working fine, but now finding issues as people have 400+ Nominal coeds set up. So there is a lag when the user is typing.Is there a better way of doing this? i have a similar setup to search a supplier but this is not a continuous form and the majority of objects are un bound.
Code:
Private Sub lstSelect_AfterUpdate()
Me.lstSelect.RowSource = "qryCurrentNominalNew"
End Sub
Private Sub lstSelect_BeforeUpdate(Cancel As Integer)
Me.lstSelect.RowSource = "qryCurrentNominalNew"
End Sub
[code]...
I have a form with a main form and a subform, main form's function is to filter the data's inside the sub form using a combo box, right now I have one combo box which filters the data according to their control no so the output if I use say CtrlNo 1 in the combo box the data that will reflect in the subform would be the data's of CtrlNo 1 but now I'm planning to add another combo box that will filter who supplied that CtrlNo.
What I did is I used the same method from my first form that filters the CtrlNo but in this form I replaced the CtrlNo combo box to Supplier Combo box it worked great but now what it made me think is it possible to put this two filters in just one form?combo box 1 is for CtrlNo combo box 2 is for Supplier.
When I tried to create this it failed, when I filtered only the CtrlNo subform doesn't reflect any data this goes the same for the Supplier combo box but when I tried to choose a filter for both combo box say CtrlNo 1 and its Supplier this works fine but what I want is to have both filters to work even if I did not use both parameters is there any way to achieve this?
I have a main form with a sub form in continuous form view. The main form displays across the top and allows the user to enter the required 4 fields of info and then tab to the subform. Here each record is a line where the user has a number of text boxes to enter the required fields. There are 2 fields that are combo boxes that are limited to the lists - the first combo box is Observation and when the user selects their choice the 2nd combo box refreshes and gives them the choices of Categories within that Observation.
I am stuck on how to make the combo boxes "independent". Right now, if the user is in record 1 of the subform and selects an observation, the 2nd combo in that record refreshes and displays the records correctly of the categories available for that observation. Then the categories are "stuck" on whatever observation was selected in record 1 when record 2 is created. If in the 2nd record (or any other) the user selects a different observation, the categories in all records display the choices for that observation.
The categories need to be reflective of the observation within each record.
I have a simple form with a combo box linked to a field on a query and command button with vb code to open a report based on the value of combo box. The command button also includes code to requery the value of the combo box so that what was already generated in the report will not display when generating another report. Since the requery is tied to the command button, there is a delay in requery of the combo box vallue unless I click the command button twice to remove the report already generated. how to apply the requery to the combo box so that when I click my comman button, the requery process will work without me having to click the command button twice?
View 1 Replies View Related