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] = " &...
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...
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...
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...
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"...
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...
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
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.
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...
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...
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...
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...
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...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.