![]() |
#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] |
![]() |
|
![]() |
||||
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 |
![]() |
tammytran105 | Word VBA | 7 | 10-02-2014 04:30 PM |
![]() |
vinceplunkett | Word | 1 | 12-03-2013 01:53 AM |
![]() |
mutchy25 | PowerPoint | 1 | 09-21-2012 01:40 AM |