この問題について教えてください。
私はフォームを持っていて、これらの値をSQL クエリのステートメントにComboBox
返したい:in
SELECT *
FROM [Actual_list query]
WHERE ((([Actual_list LSC query].[place]) In (([Forms]![Internal forms]![Places].Value))));
SQL を VBA で作成する必要があります。コンボからリストを取得できます。
これは数値リスト用で、文字列のリストには引用符が必要です。
For Each itm In Me.PlacesListbox.ItemsSelected
listofvalues = listofvalues & "," & Me.PlacesListbox.Column(0, itm)
Next
listofvalues = Mid(listofvalues,2)
sSQL="SELECT * FROM [Actual_list query] " _
& "WHERE [Actual_list LSC query].[place] In (" & listofvalues & ")"