![]() |
|
#16
|
|||
|
|||
|
Quote:
Code:
Private Sub CheckBox1_Click()
Call ShowHide
End Sub
Private Sub CheckBox2_Click()
Call ShowHide
End Sub
Private Sub CheckBox4_Click()
Call ShowHide
End Sub
Private Sub CheckBox5_Click()
Call ShowHide
End Sub
Sub ShowHide()
Dim bVis As Boolean: bVis = True
Dim aVis As Boolean: aVis = True
If CheckBox1.Value = True Then bVis = False
If CheckBox2.Value = True Then bVis = False
ActiveDocument.Bookmarks("Bookmark1").Range.Font.Hidden = bVis
If CheckBox4.Value = True Then aVis = False
If CheckBox5.Value = True Then aVis = False
ActiveDocument.Bookmarks("Bookmark3").Range.Font.Hidden = aVis
End Sub
|
|
#17
|
||||
|
||||
|
How about you sort out ALL of your requirements before trying to waste more of my time creating solutions for what turns out to be only part of what you really want to do???
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
|
|
|
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 |