こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

Access2007 データ型エラーについて

お世話になっております。
下記のVBAでコードを数値型からテキスト型に変更したところ、「抽出条件でデータ型が一致しません。」というエラーが出ました。
デバッグをクリックすると、dbs.Execute strSQLの部分が黄色に反転しています。

VBAはあまり詳しくありませんので、エラーが出なくなる方法を教えていただければ助かります。
よろしくお願いいたします。


Private Sub 在庫差引_Click()

Dim dbs As Database
Dim rst As Recordset
Dim strSQL As String

Set dbs = CurrentDb
Set rst = Me!サブフォーム.Form.RecordsetClone

With rst
.MoveFirst
Do Until .EOF
strSQL = "UPDATE マスター " & _
"SET 在庫数 = NZ(在庫数) - " & Nz(!数量, 0) & " " & _
"WHERE コード = " & !コード
dbs.Execute strSQL
.MoveNext
Loop
.Close
End With

End Sub

投稿日時 - 2011-04-07 11:48:49

QNo.6650709

すぐに回答ほしいです

質問者が選んだベストアンサー

> "WHERE コード = " & !コード

 "WHERE コード = '" & !コード & "'"
あるいは
 "WHERE コード = """ & !コード & """"
ですね。
前者の方が分かりやすいと思います。

こちらを参考にして、データ型の違いをマスターしてください。

クエリの抽出条件の例
http://office.microsoft.com/ja-jp/access-help/HA010066611.aspx

投稿日時 - 2011-04-07 12:38:35

お礼

早々にありがとうございました。
おかげさまで正常に動作するようになりました。
また、わかりやすいページを教えていただき、ありがとうございました。

投稿日時 - 2011-04-07 12:45:05

ANo.1

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問