You can do it using the Content Control OnExit event:
Code:
Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, Cancel As Boolean)
Select Case ContentControl.Tag
Case "type"
If ContentControl.Range.Text = "Litigation / Litige" Then MsgBox "Some notification"
End Select
End Sub
or you can map the control to a customXMLpart and use a pseudo change event:
Code:
Private Sub Document_ContentControlBeforeStoreUpdate(ByVal ContentControl As ContentControl, Content As String)
Select Case ContentControl.Tag
Case "type"
If ContentControl.Range.Text = "Litigation / Litige" Then MsgBox "Some notification"
End Select
End Sub