Search results

Great, thanks for the link. It looks very useful. I'll have a go at that next week when I'm back in the office.

Ah ok, that sounds sensible. Thanks. One more question though. How do I get the database to 'remember' what combo was selected when first loaded on the startup form to be able to resolve the 'on open' argument each time it is loaded on each form in that session? I can do it for a fixed...

Hi, I am trying to add a new interim 'startup screen' on my DB. This new form is unbound and has a combo box on it, the record source of which is 'BusinessName'. In my database I have two main user forms that are used frmEmployeeDetails' and 'frmJSA'. I would like the DB to filter all of...

Hi, I'm after another short lesson again from somebody please. I'm trying to improve performance and as such have been 'retro-fitting' the phrase 'option explicit' to my code. I also enabled the option in tools. Only one form has caused a problem and this is the offending code: Private Sub...

David, Fantastic! Works perfectly. Thanks for your help, that's another little skill learned for the day. Fraser

Sorry - I meant my expression should return a "0" if the F3 textbox is empty/null, not 10, like I have written. I tried setting the default value of the text box to 0 but that didn't seem to do anything. At the moment if [F3] has no value the text box returns 20, as it thinks the cell value...

Hi, I have an unbound text box which I am trying to get to return a value based on other text boxes. This is my expression: =IIf([F3]<=4,10,IIf([F3]>=15,30,IIf([F3]=Null,0,20))) [F3] is the field. Problem is I cannot get it to retun "10" if the F3 has no value. F3 may not have a vlue...

Yes, you are correct - part of the problem was the name of the subform on the main form. I had recently changed the name of the subform to a more suitable DB compatible name. But as this wasn't replicated through everything I had to track down the changes in code and controls. I was missing an...

I'm replying to myself which is quite sad. Anyway, anyone who is remotely interested I have fixed it. Needed to reference and requery the exact control on the subform in the 'On Current' event of the main form i.e. when the main form is re-queried from closing the popup form this must trigger...

Actually, maybe I was a bit premature. It works now if I only have the subform loaded sperately - it refreshes and I can pick it. However if I try it from the main form for some reason the subform isn't updating. Hmmmm

ah, fixed it. I moved my code from above to the 'on close' event of the popup form. Seem to have missed that one. Doh. Thanks for your help though, that link is useful too.

Hi, Thanks. I also tried referencing the exact control an dthat doesn't work. Form![frmJSA]![frmHazards_Subform].Form![Hazard_Name].Requery I am getting the same error for both attempts. 2457 I think it was - can't find the object blah blah. I have double checked my names etc and they are...

Hi, I have a form with a subform. On the subform I have a combo. In the not in list of that combo I trigger a second form as popup dialog to enter a new combo option, along with some linked fields. When the user clicks the 'close' command button it closes that form and returns them to the...

I am completely lost now. I have edited the code in the 'notinlist' event to this. I think I have the validated code inserted in the correct place, but it isn't working so probably not. Private Sub cboJSAref_NotInList(NewData As String, Response As Integer) 'This code allows the user to...

Ok, here's where I am: 'This code allows the user to create a new entry in a combo list and prompts the user to see if they want to add it Private Sub cboJSAref_NotInList(NewData As String, Response As Integer) On Error GoTo cboJSAref_NotInList_Err Dim intAnswer As Integer Dim...

ok, that sounds like a good plan. Yes, I am using the 'notinlist' event. I have rather crudely dropped in my code after my exisiting notinlist code, but after a quick try and geuessing that was probably too crude as it didn't do anything. So, I assume I have to append it inside my existing...

Just realised the trip was because I was missing a 'Then' after the start of the IF statement. That stops it falling over if I select a pre-exisiting reference from the combo.

David, Thanks for generating that, I have dropped it in and renamed the controls. Now, just to confuse issues this isn't actually a text box. It's a combo which looks up from a table of references. However, if it is a new entry the user can type into the combo and add to the list via code I...

Hi, I woudl like to apply an input mask to a field to ensure the following: - All caps - Max 15 text characters - Max 4 numnerical characters at the end NO symbols, as this reference ultimately beomes part of a PDF filename. Caps is easy, > and I can sort of get what I want with the text...

Good point and thank you for the further information. I have quite a bit of reading to do now, thanks to you both for the pointers.