hatena
hatena
2025/04/16 (水) 09:35:33
下記のようにデバッグ用のコードを埋め込んで実行してみてください。
strSQL = _
"UPDATE [T_製造履歴] SET [check] = -1 " & _
"WHERE (" & Me.filter & ");"
Debug.Print strSQL 'デバッグ用
Exit Sub 'デバッグ用
イミディエイトウィンドウにstrSQLに格納されているSQL文が出力されますので、それが正しいものになっているか確認しましょう。
通報 ...