trying to change rowsource using VBA

[rob_andy]

I'm using VBA to try and dynamically change a rowsource query:

SELECT Teams.TeamName, Teams.Sport FROM Teams WHERE (((Teams.Sport)="NBA"));

In VBA as follows:

Select Case Sport.Value

Case "NBA"

Team1.RowSource = "SELECT Teams.TeamName, Teams.Sport FROM Teams WHERE (((Teams.Sport)="NBA")); "

As you can see the "" marks mess everything up. I need NBA to be in "" for the query to work in access but VBA won't have it. Is there a way around this? Please Help, much appreciated. R

 

[Mr Ed]

Use three quotation marks consecutively to place a quoation mark in a string.

i.e. this

Debug.Print "some text " & """in quotes""" & " some other text"

will print a string that looks like this

some text "in quotes" some other text

 

[rob_andy]

Thanks

Much appreciated, works like a charm.