2017-12-12 14 views
0

コンボボックスの選択に基づいてレコードを自動入力しようとしています。サブフォームのコンボボックス選択に基づくレコードのオートフィル

コード

Private Sub SupplierName_Change() 
Me.RecordSource = "Select * From Suppliers Where DetailID=" & SupplierName.Column(1) 
Me.Refresh 
End Sub 

あなたはコンボボックスの選択に基づいてレコードを選択すると、それはアドバイスしてくださいになったサブフォーム

エラーイムでレコードに自動入力しなければなりません。クエリexpresion DetailID =」のおかげで事前に

ファイル名を指定して実行時エラー '3075'

構文エラー(演算子がありません)、

+1

'MsgBox(SupplierName.Column(1))'を前の行に書くとどうなりますか? – Vityata

+0

@vityayaとしてデータを取得する別のオプションは 'debug.print SupplierName.Column(1)' –

+1

です。 '.Column'は0ベースであることに注意してください。最初の列を選択したい場合、それは 'SupplierName.Column(0)' –

答えて

0

は、SQL文のためにこれを試してみてください:

」選択*サプライヤからDetailID =( "& SupplierName.Column(1)&");

関連する問題