SQLフィールドのComboBox値を使用したMSアクセス

Question

フィールドの1つがコンボボックスの値によって選択されているクエリを設定しようとしています。正しい構文を理解することはできません。

SELECT Deviations.Deviation, Deviations.Rev, Deviations.Title, Deviations.Issued, Deviations.ExpiryDate, Deviations.ExpiryHours, Deviations.ExpOther, Deviations.Active, Deviations.[Forms]![DeviationSelectionForm]![cmbAircraft] 
FROM Deviations 
WHERE Deviations.[Forms]![DeviationSelectionForm]![cmbAircraft]=True 
ORDER BY Deviations.Deviation DESC 

コンボボックスは、テーブルのチェックボックスである航空機の尾翼番号を選択：私は、次を使用して、クエリビルダのSQLビューにいますよ。チェックボックスフィールドには複数の機体テール番号があります。そこにはコンボボックスはなかったと私は例の航空機416として使用するクエリを望んでいたのであれば、クエリは次のようになります。

SELECT Deviations.Deviation, Deviations.Rev, Deviations.Title, Deviations.Issued, Deviations.ExpiryDate, Deviations.ExpiryHours, Deviations.ExpOther, Deviations.Active, Deviations.[416] 
FROM Deviations 
WHERE Deviations.[416]=True 
ORDER BY Deviations.Deviation DESC 

私はこのクエリをテストするとき、私はそれがする必要があるとして、それは動作します。

したがって、テーブルのフィールド名を識別するフォームにコンボボックスを使用してクエリを作成する方法はどうですか？

Answer 1

コンボボックスのafterUpdateイベントでQuery SQL viacodeをビルドします。

Dim strSql as String 
strSql = "SELECT Deviations.Deviation, Deviations.Rev, Deviations.Title, Deviations.Issued, " _ 
& "Deviations.ExpiryDate, Deviations.ExpiryHours, Deviations.ExpOther, " _ 
& "Deviations.Active, Deviations." & Me!cmbAircraft _ 
& " FROM Deviations " _ 
& "WHERE Deviations." & Me!cmbAircraft & " =True " _ 
& "ORDER BY Deviations.Deviation DESC" 
CurrentDb.QueryDefs(<yourqueryname>).SQL = strSql 

つまり、データベースの代わりにスプレッドシートを作成したようです。 テーブルは正規化されていません。航空機は列ではなくレコードでなければなりません。データベース設計と正規化についてお読みになることをお勧めします。