Access チェックボックスの外し方

Question

フォームでチェックボックスにチェックが入っている物だけをWordにエクスポートしたかったので、クエリを作成し、そのクエリを基にフォームを作成しました。

A：オートナンバー型
B：Yes/No型（チェックボックス）
C:短いテキスト

このフォームにボタンを設け、クリック時にWordへエクスポートするところまでは出来たのですが、このままだとチェックが残ってしまいます。
後処理として、チェックをクリアしたいのですが、上手く行きません。。。

AccessとVBA初心者ですが、宜しくお願い致します。

発生している問題・エラーメッセージ

エラーは出ていません。チェックがそのまま残ってしまいます。

該当のソースコード

Private Sub コマンド186_Click()
Dim strReportName As String
Dim strPath As String
Dim strFileName As String
Dim strMsg1 As String
Dim strMsg2 As String
Dim strMsg3 As String

strMsg1 = "保存するレポートの名前を入力してください"
strMsg2 = "保存先をフルパスで入力してください。前後のダブルクオーテーションは削除してください。"
strMsg3 = "保存するときのファイル名を入力してください"

If MsgBox("Wordで保存しますか？", vbYesNo) = vbYes Then
strReportName = "R_Reference一覧"
strPath = InputBox(strMsg2, "保存先")
strFileName = InputBox(strMsg3, "ファイル名")
If strPath <> "" Then
DoCmd.OutputTo acOutputReport, strReportName, acFormatRTF, strPath & "" & strFileName & Format(Date, "yymmdd") & ".doc", False
End If
End If

Me.[chkdate].Value = 0 'チェックオフ
Me.Requery

DoCmd.Close

End Sub

試したこと

チェックを外すことと、再クエリ

補足情報（FW/ツールのバージョンなど）

Access2016

Answer 1

Me.[chkdate].Value = 0ではカレントレコードしかoffになりません。
offにする更新クエリーを作成し実行して下さい。

若しくは以下の様に直接更新をするとか

 CurrentDb.Execute "update テーブル名 set chkdate=False"

Comments

[Daiki1270]

saziさん
ありがとうございます。更新クエリを作成する方法で出来ました！
因みにですが、「更新クエリを実行すると・・・（云々）」と言うメッセージが出ますが、これを出さないようにする方法はありますでしょうか？

[sazi]

DoCmd.SetWarnings False
処理
DoCmd.SetWarnings true
のようにシステムメッセージを処理前に無効にし、処理後に有効にします。

[Daiki1270]

saziさん
出来ました！ありがとうございます。
厚かましいお願いにも親切にご回答頂き、ありがとうございました。