Ticking all checkboxes on a datasheet

[redbase]

I have a datasheet which shows hundreds of records. One of the fields in each record is a checkbox. I am looking for a way of ticking and un-ticking all checkboxes on the datasheet simultaneously using a command button. Please can anyone help me out with the code?

Thanks

 

[Rolliee]

Do it with a cmdButton.

sub click_command0

dim rs as dao.recordset

set rs = me.recordset
rs.movelast
rs.movefirst
do while not rs.eof
rs.edit
rs.click0 = yes
rs.update
rs.movenext

loop
'close out properly and requery your form. If you wish an example email me and ask, descibing what you wish to do.

rollie@bwsys.net