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

checkboxes VBA .docm (25.0 KB, 7 views)

A checkbox doesn't have a "Visible"property, but you can come close:



Private Sub CheckBox1_Click()
If CheckBox1 Then
With CheckBox2
.Width = 1
.Height = 1
.Enabled = False
End With
With CheckBox3
.Width = 1
.Height = 1
.Enabled = False
End With

Else
With CheckBox2
.Width = 108
.Height = 18.6
.Enabled = True
End With
With CheckBox3
.Width = 108
.Height = 18.6
.Enabled = True
End With
End If
End Sub

__________________
Greg Maxey
Please visit my web site at http://www.gregmaxey.com/

Hello,
thank you for the answer. I guess thats one way to get around and solve the problem, thank you!

Best regards