How to use checkbox to show/hide bookmarked text?

namrehx · #5 11-30-2017, 03:12 PM

Hi,

What I had working for a single checkbox and bookmark before needing help with multiple bookmarks for one checkbox was this:

Code:

 Private Sub CheckBox1_Click()
    Dim ShowText As Range
    Dim HideText As Range
    
    Set ShowText = ActiveDocument.Bookmarks("Bookmark1").Range
    Set HideText = ActiveDocument.Bookmarks("Bookmark1").Range
    
    If CheckBox1.Value = True Then
        ShowText.Font.Hidden = True
        HideText.Font.Hidden = False
    Else
        ShowText.Font.Hidden = False
        HideText.Font.Hidden = True
    End If

End Sub

The code that you provided makes the bookmark disappear when checking the checkbox. I'm trying to make it so that the bookmark appears when the checkbox is checked and not unchecked.

Code:

Private Sub CheckBox1_Click()
 
ActiveDocument.Bookmarks("Bookmark1").Range.Font.Hidden = CheckBox1.Value

End Sub

Using your coding, how would you make the bookmark appear instead of disappearing when checking the checkbox?

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Hide rows with checkbox	gebobs	Excel	3	03-24-2015 12:05 PM
Show/hide text macro and security issues?	subspace3	Word VBA	1	10-05-2014 10:05 AM
Show/Hide Text based on Checkbox Selection	tammytran105	Word VBA	7	10-02-2014 04:30 PM
Hide Checkbox When Printing	vinceplunkett	Word	1	12-03-2013 01:53 AM
VBA for CheckBox to Hide Slides	mutchy25	PowerPoint	1	09-21-2012 01:40 AM