Reset "Button" to clear Word user-filled form, from all filled details.

Rafi · #1 11-28-2018, 11:29 PM

Quote:

Originally Posted by Guessed

Are you using a password on the form protection? Assuming there is no password, and the form is protected before the macro is run, the following modifications would be required.

Code:

Sub ClearForm()
  Dim aCC As ContentControl
  ActiveDocument.Unprotect
  For Each aCC In ActiveDocument.ContentControls
    aCC.Range.Select
    If aCC.Type <> wdContentControlDropdownList Then
      aCC.Range.Text = ""
    Else
      aCC.Type = wdContentControlText
      aCC.Range.Text = ""
      aCC.Type = wdContentControlDropdownList
    End If
  Next aCC
  ActiveDocument.Protect wdAllowOnlyFormFields
End Sub

This code will fail if the form is not already protected or has a password so a better solution would be to add more lines of code to check first.

The two codes you -Guessed & gmaxey- provided me , are working very effectively!

When I applied them to more forms, especially with a few boxes, they work perfectly!
I'll have to make do with it right now.

I need to take the time and try to learn more about the "preparation" of the form for the code , all in order to make intelligent use of the useful codes that you have given me.

Thank you very very much for your warm hospitality and helpful explanations.

arnold_zee32 · #2 10-13-2021, 01:48 AM

Hi. The code works with text but does not work with check box content control. can we add it in the code please. thank you.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
button "clear format", etc; anchors, functions and properties of OpenType, negative width of symbol?	tvan	Other Software	1	07-18-2018 03:55 PM
Using outlook form to enforce field to be filled in	megatronixs	Outlook	1	01-21-2015 01:11 PM
Text form filled shading	Barbara	Word	2	04-25-2013 05:21 AM
Add a "SAVE" Button to a form template?	Dave L	Word	9	03-21-2012 07:04 PM
How can create a form in Word 2007 that can be automatically filled?	artistech	Word	0	08-04-2010 01:05 PM