How to update a Word task list using checkboxes and VBA

In Word 2013, I have several lists of items with a checkbox at the start, eg.:

Communications

☑ Make presentations
☑ Draft guides
☑ Explain procedures
☐ Interpret technical information

Planning

☐ Authorise budgets
☑ Drawing up staff rotas
☑ Organise meetings
☐ Plan travel

All the checkboxes are checked when Word opens. Any one of the checkboxes can be clicked to uncheck it. At this same time the text next to that checkbox needs to be crossed out and turn from a black to a grey colour. If the checkbox is clicked again to re-check it, then the text needs to reset itself to black and uncrossed out. How can this be done? Would anyone offer some sample code? Thank you.