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 Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by rilkyn

  1. rilkyn

    Find a record based on two criteria

    Haha! Have now figured it out. It was the syntax I was using. Got round the problem by assigning it to a string value as such: Dim StrSrch As String ' Find the record that matches the control. StrSrch = "[Datagroup Name] = '" & Me![Combo52] & "'" & "And [Version] = " &...
  2. rilkyn

    Find a record based on two criteria

    I've now tried the following but am getting a runtime 13 error Me.RecordsetClone.FindFirst (("[Datagroup Name] = '" & Me![Combo52] & "'") And ("[Version] = " & Me![Combo68])) The combo values are populating correctly so I assume the problem is with using both values to find the record I am...
  3. rilkyn

    Find a record based on two criteria

    Hi I have a form which currently displays all records based on a value from a combo box. I am looking to change the form so that there are two combo boxes. The data is as follows: Column 1 = Datagroup Column 2 = Datagroup Version Column 3 = Data The first combo box will filter based on...
  4. rilkyn

    Export to Excel using a combo box to filter the query

    Ah Figured it out. Changed to the following: Dim StrSQL As String Dim qdf As QueryDef 'Create temporary query using Combo1 filter value StrSQL = "Select * From [App Health Check FSL2 query] Where [APPL] = Forms![App Health Check form FSL2]![Combo1]" And works fine Thanks Remou for...
  5. rilkyn

    Export to Excel using a combo box to filter the query

    Thank for your help but I am still having problems. The full code currently looks like this: Dim StrSQL As String Dim qdf As String 'Create temporary query using Combo1 filter value StrSQL = "Select * From " & Me.[App Health Check FSL2 query] & " Where " & Me.Combo1 If DLookup("Name"...
  6. rilkyn

    Export to Excel using a combo box to filter the query

    Hi I am exporting a query from a form, via a button. The query exported is used to populate the open form but the query output is filtered by a combo box. What I want to do is apply the same filter to the export so that what is seen in the form is also seen in the export. The code I use for...
  7. rilkyn

    Selecting records on a subform using multiple criteria

    Thanks for your help. I rewrote the subform query to pick up the values from the combo boxes and then set a requery (as suggested) on the second combo box. Works like a dream. Thanks R
  8. rilkyn

    Selecting records on a subform using multiple criteria

    Thanks for the suggestion but I have run into the following problem: I am now getting the following error: Run-time error 3070 The Microsoft Jet Database engine does not recognise 'CD010' as a valid field name or expression. CD010 is the first datagroup value on the table.
  9. rilkyn

    Selecting records on a subform using multiple criteria

    Hi I have a subform with the following fields: Module, Datagroup, Version. The main form has two combo boxes: Combo Box 1 lists all datagroups Combo Box 2 lists all versions based on the datagroup selected in combo box 1 The subform needs to display the modules based on the datagroup/version...
  10. rilkyn

    Compare a text box value with a query value

    This has also been posted on Microsoft: Access Forms as I was not sure where best to put this Hi I am using Access '97 I have a form with a subform set to continuous forms. This form reads from table [Access Paths] and displays five pieces of information for each record. What I have been...
  11. rilkyn

    Compare a text box value against a query

    Sorry, forgot to add that I am using Access '97
  12. rilkyn

    Compare a text box value against a query

    Hi I have a form with a subform set to continuous forms. This form reads from table [Access Paths] and displays five pieces of information for each record. What I have been trying to do, however is highlight the text box where the value from the record is not the highest value available. An...
  13. rilkyn

    Confirm a record exists before opening a form

    Once again, the experts come to my rescue. Thank you as this problem is now solved. I've gone with Aceman's solution. Thanks, again Rilkyn
  14. rilkyn

    Confirm a record exists before opening a form

    I've had a look at using Dlookup and other postings and have come up with the following: Dim stDocName As String Dim stLinkCriteria As String Dim StLink As Variant StLink = Nz(DLookup("[Link]","[Document List]" ,_ "'[Link]'" = "'" & Me![Combo97] & "'"), 0) If StLink = 0 Then...
  15. rilkyn

    Confirm a record exists before opening a form

    Hi I have a form which is used to update records on table 1. At the bottom of the form is a button to got to form 2 and display related records that exist. This works fine unless there are no related records on table 2. If this happens form 2 is just blank. What I would prefer is for a...

Part and Inventory Search

Back
Top