アプリ版:「スタンプのみでお礼する」機能のリリースについて

特定のレコードでボタンをクリックすると、以下のエラーが表示されて、「Me.チェック = True」が黄色に反転します。

実行時エラー ’-2147352567(8002009)’
データは変更されています。

文法的におかしなことをしていると思うのですが、エラーが出ない方法を教えていただければ助かります。
よろしくお願いいたします。


Dim dbs As Database
Dim strSQL As String

Set dbs = CurrentDb
strSQL = "UPDATE マスター " & _
"SET 在庫数 = NZ(在庫数) + " & Nz(Me.入庫数量, 0) & " " & _
"WHERE コード = '" & Me.コード & "'"
dbs.Execute strSQL

Me.チェック = True

A 回答 (1件)

なにやっているのか良くわかんないけど、


直前に、
me.refresh
ってやると、なにかかわる?
    • good
    • 1
この回答へのお礼

できました!これで解決です。
ありがとうございました。

お礼日時:2011/12/09 14:36

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

関連するカテゴリからQ&Aを探す


このQ&Aを見た人がよく見るQ&A