Dennis-
You must enclose the criteria string in quotes. Try this:
stLinkCriteria = "[Mässa Huvudtitel]=""" & _
[Forms]![Adressregister]![Kontaktpersoner]![BranschKP3].[Form]![Bransch] &
""""
John Viescas, author
Microsoft Office Access 2010 Inside Out
Microsoft Office Access 2007 Inside Out
Building Microsoft Access Applications
Microsoft Office Access 2003 Inside Out
SQL Queries for Mere Mortals
http://www.viescas.com/
(Paris, France)
--------------
From: MS_Access_Professionals@yahoogroups.com
[mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of Dennis Davidsson
Sent: Friday, May 11, 2012 12:20 PM
To: MS_Access_Professionals@yahoogroups.com
Subject: [MS_AccessPros] To open a from with link criteria from a subform
Hello,
Trying to open another form from my primary form by clicking a button I get the
following error message from Access , which I cannot figure out how to correct:
Syntax error(operator missing) in the query expression '[Mässa Huvudtitel]=BRAU
Beviale'
The character string value 'BRAU Beviale' is the name of a Trade Fair and it is
correctly obtained from the reference to a value in a combo box in a subform of
a subform in the piece of code below.
What is wrong with my piece of VBA code behind the button?
The code is as follows:
Private Sub Mässor_Click()
On Error GoTo Err_Mässor_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Mässor"
stLinkCriteria = "[Mässa Huvudtitel]=" &
[Forms]![Adressregister]![Kontaktpersoner]![BranschKP3].[Form]![Bransch]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Mässor_Click:
Exit Sub
Err_Mässor_Click:
MsgBox Err.Description
Resume Exit_Mässor_Click
End Sub
Kindly regards
Dennis Davidsson
[Non-text portions of this message have been removed]
Tidak ada komentar:
Posting Komentar