View Single Post
 
Old 09-19-2019, 03:41 AM
gmaxey gmaxey is offline Windows 10 Office 2016
Expert
 
Join Date: May 2010
Location: Brasstown, NC
Posts: 1,429
gmaxey is a jewel in the roughgmaxey is a jewel in the roughgmaxey is a jewel in the roughgmaxey is a jewel in the rough
Default

Basically in the ThisDocument module add code similar to this:

Code:
Private Sub OptionButton1_Click()
   If OptionButton1 Then
     CheckBox2 = True
     CheckBox4 = True
     CheckBox1 = False
     CheckBox3 = False
   End If
End Sub
Private Sub OptionButton2_Click()
   If OptionButton2 Then
     CheckBox2 = False
     CheckBox4 = False
     CheckBox1 = True
     CheckBox3 = True
   End If
End Sub
__________________
Greg Maxey
Please visit my web site at http://www.gregmaxey.com/
Reply With Quote