Thread: [Solved] Preventing Form Fields to Reset
View Single Post
 
Old 07-15-2011, 09:42 PM
macropod's Avatar
macropod macropod is offline Windows 7 64bit Office 2010 32bit
Administrator
  
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 22,508
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default
Hi PosseJohn,

What you need to do is to lock each formfield. For example:
Code:
Private Sub Document_Close()
Dim fFld As FormField, Pwd As String
Pwd = "pw"
With ThisDocument
  .Unprotect Password:=Pwd
  For Each fFld In .FormFields
    fFld.Enabled = False
  Next
  .Protect Password:=Pwd, NoReset:=True, _
    Type:=wdAllowOnlyFormFields, _
    UseIRM:=False, EnforceStyleLock:=False
End With
End Sub
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote