Group: microsoft.public.word.vba.general
From: "Graham Mayor"
Date: Sunday, February 10, 2008 5:14 AM
Subject: Re: MACRO TO CLEAR A FORM

If you save the form without the data as a template and create new documents
from it it won't need clearing. However

Sub ClearForm()
Dim oFld As FormFields
Set oFld = ActiveDocument.FormFields
For i = 1 To oFld.Count
If oFld(i).Type = wdFieldFormDropDown Then
oFld(i).Result = " "
Else
oFld(i).Result = ""
End If
Next
End Sub

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

Re: Pivot Table/Query wrote:
> I have created a form for use in my office. I would like to have a
> "clear" or "reset" button at the top so that the data can be cleared
> from the form. Is there an easy way (I"m assuming a macro is needed
> with a button).