xml error .docm

lord_kaiser · #16 04-16-2018, 09:09 PM

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.

Guessed · #17 04-16-2018, 09:14 PM

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

lord_kaiser · #18 04-16-2018, 11:13 PM

Thanks for your help Guessed

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