Search results

I suppose so. How do I attach it to a message ?

The following is a 'snippet' of code, from a longer routine, which should load the day, month and year respectively, into 3 combo boxes ( the date in question, is derived from a date field - DOB - forming one field of the form's recordset - Client's details basically ). Dim d, m, y As String Dim...

Muchos gracias Mstef. It works perfectly !:D

Can I use the OpenForm method, to open my form based on a query, and go IMMEDIATELY to EOF i.e. ready to add a new record ? Here's my current statement, with just the query name to qualify it. Thanks. DoCmd.OpenForm "frmClients", , qry1 :)

Thank you. I'm going to use a calcuoated field, and use the expression builder to calculate it. I'll et you know how I get on.

Point taken. Will do. Thanks.

Re: Can I immediately 'refresh' data in a textbox ? Is this what you mean ? Function CalculateAgeRange() Dim a, b, c, d As Long Dim dt As Date dt = Me!txtDOB.Value a = DateDiff("d", dt, Date) b = DateDiff("yyyy", dt, Date) / 4 c = Int((a - b) / 365) If c > 13 And c < 18 Then d = 1 ElseIf c...

Re: Can I immediately 'refresh' data in a textbox ? Here's the code : Private Sub txtDOB_AfterUpdate() 'use datediff to compare DOB to today's Date() then update Age_Range_ID in tblClients accordingly - Select Case 1-7 Dim a, b, c, d As Long Dim dt As Date dt = Me!txtDOB.Value a = DateDiff("d"...

Here's the difficulty. I have two text boxes ( one as a date type, the other just 'normal' ) These are on the main form, and 'related'. Here's how. As the main form loads, and one navigates through the recordset the form is based on, one sees in these 2 text boxes - D.O.B. and Age Range ( the...

My fault, apologies. the error handler, was in a proc. tat called the one I posted ( partly why I omitted it ). Having taken out the error handler, it is indeed an 'Item not found in collection error', which I have some experience and confidence in solving. Thanks for your interest. ;)

It's not that as I suspected. It's about fields not being in the underlying recordset. I had an On Error exit sub, which meant I wasn't getting error messages. I should be able to fix now. Thanks.

Will do. Thanks.

You will see I hope, from looking at the sub-routine (UpdRefInfo), that I am referencing a recordset on a subform, from another form. I then simply update a number of fields from that recordset ( using data retrieved from various input controls on the 'calling' form - or form that this code...

The following is a sub-routine, which ran perfectly well, before I added ( both to the underlying table/query and the .Edit & .Update in the Sub) the field ... !Signpost_ID. i've run teh debug through it,a nd it just skips out of teh procedure, at the point it recahes the line !Signpost_ID =...

For some reason my combo box, now shows me the list, but when I select it doesn't do anything, i.e it locks, and doesn't close dropdown and put selection in text part ?

Column Count = 4 Column Width(s) = 0cm;2.286cm;2.032cm;1.524cm Do these have a bearing on the 'typed text' in the combo box ? Thanks.

The Following code, I hoped would update a field on the subform ( Before_Update event ) which opened it i.e a combo box returned value Private Sub cboAssigned_To_Click() If Me.cboAssigned_To.Text = "" Then Response = MsgBox("You have not selected a name", vbInformation, "Referral...

Thank you. I did try that, but I'll look at it again. In fact, I'll put a new Combo on the form ( i.e with default settings ), and then make one change at a time, to find the 'culprit', by a process of elimination.

I've got a combo, which is now 'blank' ( well text part anyway .. ) on load. I can usually start typing text, which then begins locating the item I am seeking, by highlighting the matching item. This is now not working, and wil not allow me to type ANY text at all. I suspect it's a property...

Thanks for this link boblarson. I've now got what I wanted basically. I've changed the field order of the original 'SELECT' statement, so it now automatically searches on Surname rather than Forename ( as this is the field order in the row source, I was wondering if the default field for...