I currently have a combo list on a purchase order form that has the following event procedure(s) in it so as to open the inventory window as needed to add/edit inventory.
Not in List:
Private Sub Combo55_NotInList(NewData As String, Response As Integer)
MsgBox "ERROR: ITEM not in list. Double-click this field to add an entry to the list."
Response = acDataErrContinue
End Sub
On Double-Click:
Private Sub Combo55_DblClick(Cancel As Integer)
On Error GoTo Err_Combo55_DblClick
Dim lngCombo55 As Long
If IsNull(Me![Combo55]) Then
Me![Combo55].Text = ""
Else
lngCombo55 = Me![Combo55]
Me![Combo55] = Null
End If
DoCmd.OpenForm "INVENTORYITEMSform", , , , , acDialog, "GotoNew"
Me![Combo55].Requery
If lngCombo55 <> 0 Then Me![Combo55] = lngCombo55
This works GREAT on other forms I have however, on this particular form it gives me the following error:
ERROR:
You have tried to assign the null value to a variable that is not a variable data type.
I have started from scratch several times....can anyone help? Is there anyway to add a button to the form to open the inventory form and then requery the combo box when closing the inventory form?
the user searches records and they are filtered..http://www.londonheathrowcars.com/searchform.jpghttp://www.londonheathrowcars.com/searchquery.jpgand when they double click i want the record to open in this form..http://www.londonheathrowcars.com/showform.jpghttp://www.londonheathrowcars.com/showquery.jpgtrying to put this code on my listbox but gettin the openform cancelled 2501 error on the bold line.. anyone see why?Private Sub QuickSearch_DblClick(Cancel As Integer)Forms("searchform").SetFocusForms("searchform").RecordSource = vbNullStringDoCmd.OpenForm "showform", , , "[jobref] = " & Me![QuickSearch].Column(0)End Subnote:on the search form.. the form has no record source.. the listbox has the record source of the searchquery..also on the show form.. the form has the record source of the showquery.
Created a form that requires daily work flow info to be entered. Tested the form accepting random typos like "%, # ! etc... Worked just fine. In production received the following long error:"The expression On Click you entered as the event property setting produced the following error: Expression may not result in the name of macro, user defined function or event procedure".
The expression On Click you entered as the event property setting produced the following error: Procedure declaration does not match description of event or procedure having the same name
Now this is the error message that I am constantly getting from any command button I hit on a certain form. Here is the code of the form.
Option Compare Database Option Explicit Public inputCSV As String, ORG As String
I changed the names of the buttons, reconstructed the code under those names, went to the modules and changed names, made sure that a sub o function name is not duplicated in the project... But helas the error is still there. It used to work and suddenly does not work.
Hoping someone can help me with this. I have a form (one-side) with a bound continuous subform (many-side). I have a second unbound subform, also continuous, which is used as a reference only (no data entry) to select the record to be added to the bound subform. Is it possible to set it up so that, when the user double clicks on the pk from the unbound subform it adds that pk as a new record on the bound subform?
I want to lookup a list of employees (in a form) and by double clicking a name listed, have that name pasted into another form or Sub form to add details to it.
I want to select a number of employees and add info such as attending a training session, plus the topics covered, instructors name etc. I want to add this info once but relate it to a number of employees who attend the training???
I have a list of companies in a table which Is being accessed through a list box. I wanted the user to be able to double-click on the name of a company from that long list and then for that selection to show up on an adjacent shorter list box which in turn will be used for a search. How can I do this? Another option would be to drag and drop the name from on list to another.
I have a form which has a tab control on it. The form itself is based on 1 table (tblCustomers). The tab control has 2 pages.
Page 1 shows 6 fields from tblCustomers.
Page 2 of the tab control shows 2 embdedded forms. Those forms are based on queries created from tblCustomers. one shows records with a date entered into one of the fields, the other shows records that have no dates.
What I want to be able to do is when I see a company name in one of the ebedded forms (Page 2), I want to be able to double click that record and it switches me back to Page 1 and shows the the related details of whichever company I double clicked.
I have changed the double click event in the emdedded form and using the builder to create something. I also added a setfocus command as I read about that somewhere (but i have no idea what it does). Through this I managed to get it to switch from Page 2 to Page 1 when I double click, but it only ever takes me to record 1 regardless of which company i double clicked.
i may have this deisgned totally wrong so please feel free to point me in the right direction.
I have a database that is used in academic labs by student workers. In order for them to open the database they have to double click on the actual file via a network folder. This works for all but one computer. It will only open the file if they open Access first. It seems very strange to me seeing as other computers in that same lab (all the same image) will open it via double clicking. I have googled till my eyes bled but haven't found a solution. Any help will be greatly appreciated!
I have a query with following sql SELECT tblTrip.PaySlipReference, Sum(tblTrip.NDays) AS TotNDays, Sum(tblTrip.FlyingTime) AS TotFlyingTime, Sum(tblTrip.DutyTime) AS TotDutyTime, Sum(tblTrip.TAFB) AS TotTAFB, Sum(tblTrip!DutyPayRate*tblTrip!TAFB) AS TotDutyPay FROM tblTrip GROUP BY tblTrip.PaySlipReference;
I cannot find a solution for 2 questions: 1 - I need to count the number of records it has grouped as PayslipReference 2 - I need to double click on the field PaySlipReference and obtain list of all the records related to the PaySlipReference wich I have doubleclicked
If you click on the main form called frmpatient you will see 2 text boxs one called Primary Insurance the other Called Secondary Insurance
Above those text boxes are to hyper links which open the list box
What I'm trying to do is if a user double clicks the name of the Insurance From the List Box it will insert that Name of the Insurance Into either The Primary Insurance or Secondary Insurance Text Fields
I do not Want to Use combo Boxes because I have about 1,000 Insurances in my database.
:mad: Hi all I cannot get it to work, I have a combo box that on double click should open a form to add the item with all the relevant details, when ài double click on th combo box it does open the form but not in a add mode, it actually opens it on the first record of the DB, th vb instruction is as following:
Private Sub CP_DblClick(Cancel As Integer) On Error GoTo Err_CP_DblClick Dim ImgEventTypeID As Long
If IsNull(Me![CP]) Then Me![CP].Text = "" Else IngEventTypeID = Me![CP] Me![CP] = Null End If DoCmd.OpenForm "Crew Members NV", , , , , acDialog, "GoToNew" Me![CP].Requery If IngEventTypeID <> 0 Then Me![CP] = IngEventTypeID
Exit_CP_DblClick: Exit Sub
Err_CP_DblClick: MsgBox Err.Description Resume Exit_CP_DblClick End Sub
Hi all I have a form with inserted a subform, I would like to double click on the field "date" on the subform to open the relative complete record on the original mask! Thanks M
I have created two forms one call patient info and another called insurance on patient info form I have a text box called insurance. I want to create a event procedure whereby i could double click the box and view insurances added to database. once appropiate insurance is chosen it will display insurance name in box, any Ideas on writing code for this.
greetings all..i have tried to use an old database template i had and re-work it for my new client..basically the user types a ref no into a search box.. there is a text list that is narrowed down to the chosen item as they user types..then they double click on the item in the list and it opens in the main form..this is how it should work.. i think im pretty close but im gettin a few problems.. i would be very grateful if someone could have a look at it...the form i want all this to happen on is called MAINFORM.. the database is very simple.. one table.. one query.. thats it..thanks..
I have managed to populate a treeview with some menu items I required and it looks great but I now need to get it to do something. How do I get a tree view value (selection) to act as a variable in routine. e.g. if my tree look like this.
Menu ¦ - Compaint management I I----My compaints
When I "double click" on My Complaints I want it to a open a specific form. One I know how to do one action I should be able to figure the rest out for myself.
This is probably failry simple if you know what you're doing, but I don't know what I'm doing....
I have a form (Purchase Orders) and on that form there is a search button to allow the user to search the customers table by customer name. When the user clicks the search button a search form opens and the search results (customer number, first name, last name) populate a list box named "lstCustInfo". How can I set the list box double click event to return the customer number, first name and last name to the Purchase Orders form? To make it even more complex I would like to return the data in two fields: customer number and LastName, FirstName. The problem with returning the results in two fields though is that I need to be able to break it into three to save it in the customers table because the table has a place for Customer Number, First Name and Last name.
Does anyone have any suggestions? Is there a better way to do this than returning 2 fields and having to break it back into 3 to store?
First, I want to say I would REALLY appreciate any help I could get with this problem. Let me lay out the details.
I DO NOT, DO NOT, DO NOT know the first thing about programming for ms access. I am an absolute novice, no exaggeration at all. I was a liberal arts major in school!!!!!
Here's the thing: being adventurous and all, about 2 years ago a co-worker and I were fiddling with databases to try and help out our employer keep track of dispatching his equipment for his business. With a little too much time on our hands, before we knew it, our database became fairly complicated, for such novices. A kind gentleman on this forum did us an enormous favor, and programmed a search form for our database. you could enter any or all of the id #'s for various equipment, and it would pop up in a list box. Double-clicking the listbox would open the particular record you were looking for.
Fast-forwarding to now, I'm trying to create another database to keep track of our inventory while while various equipment moves in and out of our yard. I have tried using the old search form as a foundation to create a similar search form for this db. I think I actually have it (kind-of) working! You type in a container number, and the record should pop up. which is a miracle all its own.
problem is, is that when you doubleclick the selection in the list box, I receive the following error:
I don't know what to do! I'm sure it must be something painfully simple or obvious, but I'm really stuck & would appreciate any help.
Also, I would really appreciate any advice on this: I'd like to also be able to search by chassis # in addition to container number, but i don't know how to do it. no big deal, though. THANKS SO MUCH!!
p.s., I've attached the db. please let me know if you can open it ok
Private Sub tbxPoor_DblClick(Cancel As Integer) Me.TtbxPoor= Me.TtbxPoor+ 1 End Sub
This simple event on double clicking a field on my form increments the number in the field by 1. There are 10 fields in all where I want the user to be able to do the same. Is there an elegant way to code this event for all those fields using one routine or is it best to add the event to each field?
i will show you my list box code. i would like to make it possible for my user to double click on an item in the list and it opens that record in my 'zEnquiry' form (which has the correct named fields to display the data already)
i had some double click code but i deleted it, and now ive forgotten which post i found it in.
here is the code for my listbox
Private Sub QuickSearch_AfterUpdate()
DoCmd.Requery Me.RecordsetClone.FindFirst "[Enq_Forname] = '" & Me![QuickSearch] & "'" If Not Me.RecordsetClone.NoMatch Then Me.Bookmark = Me.RecordsetClone.Bookmark Else MsgBox "Could not locate [" & Me![QuickSearch] & "]" End If
I have a few search forms that, when search parameters are entered, a continuous subform displays the results (summarised...not all fields show).
I want to be able to double click a field in any given record, and have it open in a form allowing editing of the record.
I know I need something in the OnDoubleClick event of the text box I want to double click, which would then open the form, but I don't know what code to use.
For the sake of argument, I want to double click on the txtSerialNumber text box to do it, as this is a unique field.
I all I have looked in the forum but can't find anything that matches I have a form containing a subform called eventswich shows some events in date order, as I have too many information on the table events I could not put them all in the subform if not only the essential information, what I need is if I double click on the field "DATE" it would open the "EVENT" form and show me all the information contained in the record.At the present time I have the filed SELECT RECORD set to NO on the form properties! Hope I have given a good explanation!!!! Thanks Marco
I have the following code that I have been trying to get to work:
Private Sub txtSocNumber_DblClick(Cancel As Integer) On Error GoTo Err_txtSocNumber_DblClick
Dim stDocName As String Dim stLinkCriteria As String
stDocName = "FrmApplicantFullDetails"
If IsNull(Me.txtSocNumber) Or Me.txtSocNumber = "" Then MsgBox "This record is empty", vbInformation, "No Data" Me.txtSocNumber.SetFocus Else stLinkCriteria = "[ApplicantID]=" & Me![InvestigatorID] DoCmd.OpenForm stDocName, , , stLinkCriteria End If
Exit_txtSocNumber_DblClick: Exit Sub
Err_txtSocNumber_DblClick: MsgBox Err.Description Resume Exit_txtSocNumber_DblClick End Sub
I have the following two tables:
Applicant and Investigator
Applicant: ApplicantID InvestigatorID etc
Investigator: InvestigatorID etc
The relationship is setup as 1 investigator to many applicants.
What I am trying do is this. I have form with a subform in it. In the subform there is applicant info IE SS# LName, FName and that is it. What I want to do is be able to double click on the SS# have the form "FrmApplicantFullDetails" open so you can view the work up on the applicant or edit info on the applicant.
Am I going about this the right way with the above code? Or is there something else I am missing in the code or is there code out that will do what I am looking for that is easier?
I need created a form frmFlight this form has two fields called DEP and ARR what I need is when the users types the 3 letter code in the DEP or ARR field if these do not match the any records in field AirportCode in the table tblAirport will highlite a error. Also I need to double click on the field DEP or ARR in the frmFlight and open the frmAirport with the specific record. Example if one of the records contain LCY by double clicking it will open the form frmAirport displaying the LCY record.
I am having a problem in my access database. I have a a form called Compliance Register. When this window opens it lists all of the requirements of a particular department. There is an ID and Source ID(this field can contain the same number such as multiple 17's). The descriptions match up to what is supposed to be shown. However when I double click on the item, it brings up a Compliance Status window. This is where things go wrong.
It shows the status listed as the first Source ID that matches the number, but does not seem to also be matching up the ID as well It must match both ID and Source ID since Source ID can have the same number multiple times down the list..
Here is what is under the Event Procedure for the double click.
Private Sub ListRequirements_DblClick(Cancel As Integer) On Error GoTo Err_ListRequirements_DblClick Dim stDocName As String Dim stLinkCriteria As String stDocName = "Compliance Status"
[Code] ......
Under stlink criteria, i need it to not only pull the ID, but it has to have a "AND" Source ID. I need it to pull the record that matches BOTH numbers.
