[Chuck[_2_]]

hi guys,

i did a bit of more research and found this

=====
http://help.lockergnome.com/office/W...ict992089.html

Insert a bookmark around section of the text that you might want
deleted and
have a macro that contains the following code run on exit from the
associated checkbox

With ActiveDocument
..Unprotect
If .FormFields("Check1").CheckBox.Value = False Then
..Bookmarks ("CheckBox1Text").Range.Font.Hidden=True
Else
..Bookmarks("CheckBox1Text").Range.Font.Hidden=Fal se
End If
..Protect wdAllowOnlyFormFields, NoReset
End With

Under ToolsOptionsView, you will want to have the display of Hidden
Text
enabled so that the user can go back and change their selection and
under
ToolsOptionsPrint, make sure that the box for Hidden Text is
unchecked so
that text that is so formatted does not print.

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

===================

now, i have created a macro based on the above..

With ActiveDocument
.Unprotect

If .FormFields("Check15").CheckBox.Value = False Then
.Bookmarks("CheckBox15Text").Range.Font.Hidden = True
Else
.Bookmarks("CheckBox15Text").Range.Font.Hidden = False
End If

If .FormFields("Check13").CheckBox.Value = False Then
.Bookmarks("CheckBox13Text").Range.Font.Hidden = True
Else
.Bookmarks("CheckBox13Text").Range.Font.Hidden = False
End If

If .FormFields("Check14").CheckBox.Value = False Then
.Bookmarks("CheckBox14Text").Range.Font.Hidden = True
Else
.Bookmarks("CheckBox14Text").Range.Font.Hidden = False
End If

If .FormFields("Check17").CheckBox.Value = False Then
.Bookmarks("CheckBox17Text").Range.Font.Hidden = True
Else
.Bookmarks("CheckBox17Text").Range.Font.Hidden = False
End If

.Protect wdAllowOnlyFormFields, NoReset

End With

End Sub

i have put this in
Normal Modules NewMacros

however, this is not working

can anyone advise what i have done wrong?

cheers