I have a subform when a user presses Return Or Enter it doesnt go to a new record but instead enters a new line in the same records how can i prevent this from happeneing.
I have a listbox on a subform (or a subform within a subform).
When it is clicked I want all other listboxes to unselect.
There may be listboxes on the mainform, on other subforms, on other subforms of subforms.
I imagine I'm looking at a recursive function of some sort, but I'm not entirely sure of syntax to identify parent and children forms...
pseudocode so far: loop all controls if control = listbox, unselect all if control = subform - recurse: loop all subform controls if control = parent... err... Fail.
I have some code for the Key Down event for particular column in my subform
Private Sub Sample_ID_KeyDown(KeyCode As Integer, Shift As Integer) Sample_ID = Nz(DMax("Sample_ID", "Sample_Sheets")) + 1 mTo = Nz(DMax("mTo", "Sample_Sheets")) + 1 mFrom = Nz(DMax("mFrom", "Sample_Sheets")) End Sub
This works, however it also work when I press Key Up, changing what the key down previously did. I do not want it to do this. I have nothing entered in the Key up event for the form properties.
Private Sub Form_Current() If Not Me.NewRecord Then With Me.Q_Subform.Form .RecordsetClone.FindFirst "N=" & Me.N .Bookmark = .RecordsetClone.Bookmark End With End If End Sub
The problem is that when the Q_Subform has no records I have the error 3021.
How can manage it. It's the last step before ending My db
I have a continuous subform which essentially comprises of a textbox that shows a field from a query.
The text in that box is essentially a few letters and a few numbers - what I am wondering is if I can have an on click event for the textbox, that when a user clicks the text it takes them to the record (in a different form) that matches the text contained in the textbox they clicked?
frmTaskTracker -subfrmInbox (Datasheet View - based on a query)
frmUpdateInboxItem
subfrmInbox displays a summary of tasks on a task list. The user navigates to frmUpdateInboxItem from frmTaskTracker. After updating a record from frmUpdateInboxItem, it is possible that it the record in question will no longer meet the requirements to have it listed on subfrmInbox.
I have attempted to add code to the on close event of frmUpdateInboxItem to requery the sub form on frmTaskTracker but am not getting the syntax correct.
correct my code? Alternatively is there is a more correct way to do this, I'd be happy to learn it.
Code: Option Compare Database Private Sub cmdClose_Click() Me.[frmTasktracker]![subfrmInbox].Requery DoCmd.Close acForm, "frmUpdateInboxItem" End Sub
I have to maintain an Access form which contain a linked subform (using Master and Child fields).
Basically, in the main form (Form1), the user choose a value in a combobox and the subform (Form2) is automatically updated.
My issue is that I have a BeforeUpdate event on one field of my subform which is preventing to update the field (Cancel=true) when it does not meet the criteria. The alert msgbox should appear once if there is any error in the field but the BeforeUpdate event is always fired 3 times for unknown reason.
What I don't understand is that if I open the subform (Form2) as a main form or if i remove the child/master link fields in the subform property sheet, it is working as expected with the BeforeUpdate event being fired only once.
Hi I was wondering if it is possible if I press a key on the keyboard say 'c' once I've opened the combo box, that I will be taken to name in the SECOND COLUMN that begins with c. At the moment if I was to press 'c' it will take me to a unique identifier that begins with c as the unique identifiers are in the FIRST column not in the second.
hey guys, i have this code which will let you type into a combo box "db" and it will pick out the selection "Die Cut / Back Slit". the following code works except for an error message coming up before it goes into the code.
"the text you entered isnt an item in the list"
anyone know how i can get around this? i tried turning warnings off on the sub but it seems to happen by default before the sub?
Code:Private Sub cmbCut_KeyPress(KeyAscii As Integer)' if pressed not enter or tab , add to a string then select value from entered chars'enter or tab key pressed (added delete and space keys to miss adding to string)If KeyAscii <> 13 And KeyAscii <> 9 And KeyAscii <> 8 And KeyAscii <> 32 Then enteredChars = enteredChars & Chr(KeyAscii)Else DoCmd.SetWarnings False Select Case enteredChars ' get letters entered and set value from combo Case "S" Me.cmbCut.Value = Me.cmbCut.ItemData(0) Case "B" Me.cmbCut.Value = Me.cmbCut.ItemData(1) Case "D" Me.cmbCut.Value = Me.cmbCut.ItemData(2) Case "DB" Me.cmbCut.Value = Me.cmbCut.ItemData(3) Case "T" Me.cmbCut.Value = Me.cmbCut.ItemData(4) Case "F" Me.cmbCut.Value = Me.cmbCut.ItemData(5) Case "FS" Me.cmbCut.Value = Me.cmbCut.ItemData(6) Case "FC" Me.cmbCut.Value = Me.cmbCut.ItemData(7) Case "FSC" Me.cmbCut.Value = Me.cmbCut.ItemData(8) Case Else 'do nothing End Select enteredChars = "" DoCmd.SetWarnings TrueEnd IfEnd Sub
Yea yea I know, another one... But the way I see is that I haven't asked them all so its ok... :p
Right basically, I only want to allow input of Y N or P into a text field. I thought it would be best to do it with an onkeypress event as I know of no way to block certain characters in a text field with an input mask.. this is what I came up with but it doesnt seem to work...
If Not KeyPress=78 Or Not KeyPress=80 Or Not KeyPress=89 Then KeyPress = 0
I have a form with a subform. I have an event on dbl-click on the subform's detail section, I want to display yet another form - frmDatePopup depending on a value in that subform. frmDatePopup has an Eval(Forms!frmDates!Start) for criteria for my date field. The problem is that when I dbl-click on the subform's detail section, frmDatePopup comes up blank, as if it ignores the Eval statement. Any suggestions on what I need to change to make this work? Thanks.
I'm trying to code an event that would occur when a user double-clicks on the Record Selector of a subform. I want it to then open a form that would provide additional details about the record selected in the subform. I can't find documentation to tell me (1) where to put the code, i.e. subform double-click event vs. subform detail double-click event, etc.; (2) how to reference the record id of the selected record for use in the filter for the form that is going to be opened (the underlying query contains the ID for the record). Can anyone help or point me to documentation?
I have a query in a subform on the main form. I have a search box that updates the subform/query as you type something (using the On Change event). You then click on the record you want which transfers the information to the appropriate text boxes (one of these txt boxes is the clientID I talk about below) located next to the search box.
I have a Contacts subform/query much like the serarch box I created and I am using a txt box (on the main frm) clientID (which I get from the above process) to filter the contacts.Now when I pass the ID to the txt box on the main form I am having trouble getting a event to trigger and update the subform/query correctly.
I am using VBA to create a simulated Click action which seems to work but is not updating the Contact subform/query, it is just resetting the subform/query. If I manually click on the txtbox with a ID in there all works wonderfully. I have attached the database. I made the clientID and btn next to it visible(this would not be visible normally).I just realised I left a button on the main form next to the clientID txt box just ignore that and click on a client then the clientID txt box to see how it updates the contacts subform..
On a subform, I have a text box control with an AfterUpdate event handler. The subform itself has an AfterInsert event handler.
If a user enters data into that tb control for a new record and then moves on (tab or click elsewhere), the AfterUpdate fires and does what it should, including setting Me.Dirty=False immediately before it completes. Then the form's AfterInsert event fires and does what it should, but finishes by returning program control to the ErrorHandler label within the control's AfterUpdate routine, reporting either an error 2101 (The setting you entered isn't valid for this property) or 3270 (Property not found). The form's AfterInsert handler does have its own ErrorHandler label, but it is not being executed.
I am starting to explore VBA and Modules. I recently found a relativly simple way to add an Audit Log to a database without adding two tables for each table as outlined by Allen Browne.
I used a set of code from fontstuff.com and it works great, except when using a sub form. I belive that it is most likely because the use of the Tag property looks at the subform as a control but it holds no value. I am thinking the VBA needs to be altered or the BeforeUpdate command need to specify what form to look in.
The Before Update code is
Code:
Public Sub Form_BeforeUpdate(Cancel As Integer)
Code: If Me.NewRecord Then Call AuditChanges("SubForm_ID", "NEW") Else Call AuditChanges("SubForm_ID", "EDIT") End If End Sub
AuditChanges is the Module Event name and CustomerID is the unique identifer for a Subform.
I have parent form and child subform. one field in the parentform is calculated on sum of records on the childsubform when the parent form loads initially the value in the calculatedfield is 0 then it shows the correct value when the childsubform value is populated i have another-field i want to change the property of the onotherfield.backcolor= RGB(0,0,255) when calculatedfield.value<0 but its taking the initial value(0) not the calculated onewhich event shall i invoke on the form so that it waits the subform to complete then fires ... i tried current, load, activate events .. with no success.
I'm trying to clean up one HUGE and ugly form by using subforms within tabs. I have a main form with "BottleID" as the key field and linking field. The tab displays pictures based on the BottleID and it works like a dream. My problem is that the "on_current" event happens 4 times on each record. For instance, I go up a record and it sets Picture1.value 4 times and it's the same thing everytime.
I'm wondering if the problems is due to bad table design. Everything is located within one table and I'm really unable to change this. It's been like this from the get go and too much to change to break it apart. Anyway, the subform is pulling data from the same table. I thought maybe this was the cause.
I'd post the database if possible, however there are hardcoded directory's and will not work unless they are all set up. Not worth it IMO. Any ideas? I tried doing the BottleID = forms!frmMain!BottleID instead of the auto-link in Access but it gives me several errors and I don't believe it buys me anything. Thanks in advance!
On clicking a button to open a form I want to filter a list in a combo Box located on the forms subform
The main form is called 'Frm_orders' The sub form is called 'sub' The combo box field is called 'CostCodeID' and I want to filter column 0 of the combobox which is Tbl_InvoiceCostCodes.Type to show records with a type of 'Repairs'
This may be a really simple problem but it has me stumped. Working in Access 2002, I have a form with a subform (continuous). When the user clicks on a textbox in the subform, I need to capture the value and pass it to the main form so that it can be used to create a filter for yet another subform (not nested) on the main form. How could I accomplish this? Thank you in advance!
I've got a subform that im writing code for, once a user enters a value in one of the fields i want to make sure they cant change that field (and two other fields in that same record, though the rest of the fields are fine to edit at will)
I've got a function already written to validate the data in the record and decide whether or not the fields are enabled and disabled, however im having trouble finding an event in which to activate the function
Is there an event that triggers whenever a user selects a different record?
Any chart or list with all the handlers and how they trigger (in relation to each other) and when?