How do i hide my 'unchecked' checkboxes when printing?

I need some help, I have a document where the unchecked checkboxes need to be hidden when the document is printed. I read a few posts, but so far it doesn't work. Now it looks like this:

Private Sub Checkbox1_Click()

ActiveDocument.Bookmarks("Bookmark1").Range.Font.Hidden = Not CheckBox1

End Sub

Can someone please help me fix it?

Thanks a lot!