2017-08-27 7 views
1

チェックボックスの列全体をオフにするにはどうすればよいですか? アクセステーブルの各レコードにチェックボックスがあるフィールドがありますが、時間が経過するとチェックボックスが表示されますが、最後にリセットすると、すべてのボックスのチェックボックスをオフにする分割フォームにボタンを配置します。ボタンを使用してチェックボックスの列全体を選択解除するにはどうすればよいですか?

それはテーブルの上に2番目のフィールド「アカウンティング」「tblData1」であると私は、フォームからそれを制御したい「frmMain」「cmdResetAcct」

事前にありがとうございます!

答えて

0

UPDATEクエリを実行します。

CurrentDb.Execute "UPDATE tblData1 SET Acct = False WHERE Acct <> False" 

WHERE句を使用すると、チェックされた行だけが書き込まれるため、効率が向上します。

1

あなたはすでにあなたのボタンのクリック時イベントに直接持っているレコードセットを使用することができます。

Dim rs As DAO.Recordset 

Set rs = Me.RecordsetClone 
If rs.RecordCount > 0 Then 
    rs.MoveFirst 
End If 

While Not rs.EOF 
    If rs!Acct.Value = True Then 
     rs.Edit 
      rs!Acct.Value = False 
     rs.Update 
    End If 
    rs.MoveNext 
Wend 

Set rs = Nothing 

これは非常に高速であり、そして、あなたのフォームが即座に更新します。

+0

ありがとうございます、私はフォームを閉じてもう一度開くまで、一度だけ動作する以外は完璧に動作しますか?それを変えるために私ができることはありますか? – Mdaox

+0

このコードの何もそれが複数回呼び出されるのをブロックしませんが、_MoveFirst_で編集された答えを見てください。 – Gustav

関連する問題