Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: Turb
  • Order by date
  1. Turb

    Not sure how to do this in Access...

    Ugh... [sadeyes] That will teach me to question something without trying the solution first!! PH, your sample works perfectly! [thumbsup2] Thank you! - Turb
  2. Turb

    Not sure how to do this in Access...

    PH, thank you for your reply! Question: Should the 'INNER JOIN' in your SQL sample be to 'Table2'? - Turb
  3. Turb

    Not sure how to do this in Access...

    I have the following table (Table1) in an Access 2003 database: PART# WHLOC #LOCS PART1 R1SH2 PART2 R3SH1 PART2 R1SH4 PART3 R4SH3 I need to run a query to populate the '#LOCS' field for each record with a number that indicates how many locations each part resides in...
  4. Turb

    Convert Excel formula for Access and run in text box?

    SkipVought, That was the key! Once I set the format of the text box controls (all of those involved) to 'General Number' and saved the form, it all worked fine. My thanks, to both of you, for all your help! - Turb
  5. Turb

    Convert Excel formula for Access and run in text box?

    straybullet, thank you for your help! But for some reason, this is returning some strange numbers for me. I created the module exactly as Allen Browne suggests (I made no changes): Function MinOfList(ParamArray varValues()) As Variant Dim i As Integer 'Loop controller. Dim varMin...
  6. Turb

    Convert Excel formula for Access and run in text box?

    I have been researching and testing and still cannot seem to figure this one out... I have to convert this Excel formula to work in an Access form: =(MAX(D1:D6)-MIN(D1:D6))/(MAX(D1:D6)+MIN(D1:D6))*100 My form's unbound text box controls: D1, D2, D3, D4, D5, D6 Formula would be entered as...
  7. Turb

    If, Then, Else error handling

    PHV, I don't know; it works nicely! Thank you! - Turb
  8. Turb

    If, Then, Else error handling

    PHV, Thank you for your post! This works beautifully! Thank you. But... it issues no message for the halt. Is there a way to do something like this, but have it pop up the message box from the Public Function when there is no entry? - Turb
  9. Turb

    If, Then, Else error handling

    Shoot! I've just realised that although I have solved the original problem (duplicate serial number on the form as in the table allowing the print function even though the save function fails), I have created another like it (NO serial number on the form is allowing the print function with no...
  10. Turb

    If, Then, Else error handling

    randy700, I'm glad. :) Thanks agian, my friend, for your timely help!! - Turb
  11. Turb

    If, Then, Else error handling

    randy700, Thank you for your post! Your post actually fixed the issue and the code now works for me (since my serial numbers are alpha-numeric), but I think I'll have to give the star to MajP this time; it was his code and he took the time to work with me through this from the very beginning (I...
  12. Turb

    If, Then, Else error handling

    MajP, Ok, I've pasted this into the Form's Class Module Public Function isDuplicate() As Boolean Dim strWhere As String strWhere = " SERIALNUMBER = " & Me.SERIALNUMBER & "" Debug.Print strWhere If DCount("SERIALNUMBER", "TestTable", strWhere) > 0 Then MsgBox "Record already Exists"...
  13. Turb

    If, Then, Else error handling

    MajP, Um... as I said, it's been awhile... where does this go? In a new database module or in a class module for the form? Public function isDuplicate () as boolean dim strWhere as string strWhere = " someNumericField = " & Me.someControl & " AND someOthertextField = '" &...
  14. Turb

    If, Then, Else error handling

    MajP, Thank you for your quick response. No, I don't get any error message on failure of the BackUpQuery function; the EventProcedure keeps right on running and the printout runs. It never occured to me to first check for a dupicate... I'll give your suggestion a try and post back. Thanks...
  15. Turb

    If, Then, Else error handling

    Hi all! I've been away from Access for a long while now, so please bear with me. I've been searching the FAQ's and threads but cannot seem to find this answer; please pardon me if this has been answered elsewhere and feel free to point me to the correct thread. I am using this code on an Access...
  16. Turb

    Query >> combo-box on a form

    Oh geez... Punctuation error! Everything works fine now. :-) Thanks again! - Turb
  17. Turb

    Query >> combo-box on a form

    Ok, here's what works so far: 1. Created a make table query (based on the original select query) to make the temp table and once it was created I then changed it to an append query to append to the temp table; this gets me the data I need. 2. Created a macro (OpenForm) to run: SetWarnings...
  18. Turb

    Query >> combo-box on a form

    Duane, Ok. Thanks for your input. So far, I looks like I will have to make some changes on this form to get what I need. I can make my form's underlying query an 'append' query (copy the existing and change it's type to 'append' - after I first make the 'temp' table), to append to the 'temp'...
  19. Turb

    Query >> combo-box on a form

    Duane, Actually, no. I want to populate text fields on a form based on the data selected by the user (one record of many) from the combo box. Well, since I cannot seem to get the combo box to show more than one record from a select query under a form... - Turb
  20. Turb

    Query >> combo-box on a form

    dhookum, thank you for the clarification. Maybe I should approach this from another angle... If I cannot get a combo box to allow me to select more than a single record from a query, even if that query has multiple records in it when run, maybe I can populate the form fields (the bound ones...

Part and Inventory Search

Back
Top