Check Box to Hide Text

[Dave]

Hello All,
I'm trying to use a check box on my template to determine whether a
paragraph should be hidded. I managed to get it to work a couple times but it
stopped when I added an additional macro to do the same thing except on a
different check box/bookmark. I will have at least 8 other check boxes on
this template that I would like to do the same thing. Any ideas on what I'm
doing wrong?? Here's the code:

Sub mcr1A()
ActiveDocument.Unprotect Password:=""
Set vCheck1 = ActiveDocument.FormFields("chk1A").CheckBox
If vCheck1 = True Then
ActiveDocument.Bookmarks("bk1A").Select
With Selection.Font
.Hidden = False
End With
Else
ActiveDocument.Bookmarks("bk1A").Select
With Selection.Font
.Hidden = True
End With
End If
ActiveDocument.Protect Password:="", NoReset:=True, Type:= _
wdAllowOnlyFormFields
End Sub

 

[Greg Maxey]

Dave,

Sorry I didn't have time to actually look at your macros. You may find the
methods described here useful:

http://gregmaxey.mvps.org/Toggle_Data_Display.htm

 

[Dave]

Thanks for the reply Greg.
That would work great if I wanted to remove the text all together. In this
case I'm just trying to stop the text from printing but still be visible on
the screen.

Thanks,

Dave

 

[Greg Maxey]

Dave,

There is an option in File>Print>Options>Include with document>Hidden text.

Can you format your text as hidden, don't dispay hidden on screen, but
include in printed document?

 

[Dave]

I might be able to do that. I'll ask the guys I'm working on it for.
The idea is to have the end user pick one of three paragraphs in each
section of the letter. There is quite a bit of hidden text already in the
letter that they don't want printed, an example would be instructions for
each section.

I would like to delete the paragraph once the user determines they don't
need it, but that's not an option at this point.

Thanks Again!!