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,601
gmaxey is just really nicegmaxey is just really nicegmaxey is just really nicegmaxey is just really nicegmaxey is just really nice
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