![]() |
|
#16
|
|||
|
|||
|
Ok,
I think i sorted it out and it works. For some reason i deleted the controls and added them in again and then it worked. |
|
#17
|
||||
|
||||
|
The concept of a group of checkbox content controls working in the same way as the old group of radio buttons (only allowing one active selection) is tricky to code. There may be a more elegant way to do this but my attempt is more flexible in supporting more than two options.
Code:
Private Sub Document_ContentControlOnExit(ByVal aCCactive As ContentControl, Cancel As Boolean)
Dim aCC As ContentControl
Select Case aCCactive.Title
Case "MyCheck", "Q1"
If aCCactive.Checked Then
For Each aCC In ActiveDocument.SelectContentControlsByTitle(aCCactive.Title)
aCC.Checked = False
Next aCC
aCCactive.Checked = True
End If
End Select
End Sub
__________________
Andrew Lockton Chrysalis Design, Melbourne Australia |
|
#18
|
|||
|
|||
|
Thanks for your help Guessed
|
|
| Tags |
| .docm, xml issue |
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
Word VBA docm to dotm problem
|
spider85 | Word VBA | 2 | 04-17-2017 02:08 AM |
SaveAs docm file from template
|
ptmuldoon | Word VBA | 7 | 03-09-2015 05:38 PM |
DOCM file not saving on Microsoft Word 2010
|
flutterby1 | Word | 4 | 10-08-2014 10:55 AM |
How to convert docm to dotm without opening the file
|
Moz | Word | 1 | 12-20-2012 04:23 PM |
| Docm content dissapearing when I open the file? | shabbaranks | Word | 2 | 07-18-2012 01:13 AM |