Hi everyone,

So I have seen this script from Greg Maxey and it works almost perfectly. The only issue I am seeing is that after I press the command button that this script is attached to it will not allow me to type in any plain text content control boxes on my form. The only way that I have found that it will let me type again is if I triple click in the text box rapidly. Does anyone know of why it would do that and if so is there a way to stop that from happening. I would appreciate any help that people will give.

Private Sub Clearform_Click()
'A quick macro scratch pad created by Greg Maxey
Dim oCC As ContentControl
For Each oCC In ActiveDocument.ContentControls
Select Case oCC.Type
Case 0, 1
oCC.Range.Text = ""
Case 4
oCC.DropdownListEntries(1).Select
Case 8
oCC.Checked = False
End Select
Next oCC
End Sub