View Single Post
 
Old 05-11-2022, 01:27 AM
Basse Basse is offline Windows 10 Office 2021
Novice
 
Join Date: May 2022
Posts: 4
Basse is on a distinguished road
Question Checkbox - toggle hide/unhide other checkboxes and their texts

Hello,
I am new to VBA and I'm trying to create an document with 3 checkboxes, where each of them shows a specific text when checked, I managed this with bookmarking the text. But I would also like to hide the other 2 checkboxes when one checkbox is checked, is this possible? And I would also like them to appear again if I uncheck the box.

Here is the VBA code I've used so far, I also attach the document:

Private Sub CheckBox1_Click()
ClickEvent CheckBox1
End Sub

Private Sub CheckBox2_Click()
ClickEvent CheckBox2
End Sub

Private Sub CheckBox3_Click()
ClickEvent CheckBox3
End Sub


Private Sub ClickEvent(ctrl As msforms.CheckBox)
Dim sBookmarkName As String

With ThisDocument
Select Case ctrl.Name
Case "CheckBox1": sBookmarkName = "TextToHide"
Case "CheckBox2": sBookmarkName = "TextToHide2"
Case "CheckBox3": sBookmarkName = "TextToHide3"
End Select

.Bookmarks(sBookmarkName).Range.Font.Hidden = _
Not ctrl.Value
End With
End Sub
Attached Files
File Type: docm checkboxes VBA .docm (25.0 KB, 9 views)
Reply With Quote