Not from Word. The NTFS filing system allows you to restrict user access to
folders and there are third party tools for earlier filing systems.

--

Graham Mayor - Word MVP

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




Patrick wrote:
Graham,

Is there a way to password protect the folder, with the files
contained within it NOT being password protected?

Patrick

"Graham Mayor" wrote:

Assuming you mean you want to password protect each document in a
folder, you need a macro e.g.

Public Sub PasswordAll()

Dim FirstLoop As Boolean
Dim myFile, Password, PathToUse As String
Dim myDoc As Document
Dim Response As Long

'**********************************
'enter path to the folder below
PathToUse = "D:\My Documents\Test\Merge\"
'***********************************
sPassword = InputBox("Enter Password")

On Error Resume Next
Documents.Close Savechanges:=wdPromptToSaveChanges
FirstLoop = True
myFile = Dir$(PathToUse & "*.doc")
While myFile ""
Set myDoc = Documents.Open(PathToUse & myFile)
If FirstLoop Then
With ActiveDocument
.Password = sPassword
.WritePassword = sPassword
End With
FirstLoop = False

Response = MsgBox("Do you want to process " & _
"the rest of the files in this folder", vbYesNo)
If Response = vbNo Then Exit Sub
Else
With ActiveDocument
.Password = sPassword
.WritePassword = sPassword
End With
End If
myDoc.Close Savechanges:=wdSaveChanges
myFile = Dir$()
Wend
End Sub

See http://www.gmayor.com/installing_macro.htm

--

Graham Mayor - Word MVP

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




k_man10 wrote:
I would like to set up a folder to be password protected so I dont
have to keep doing every individual document. Is this possible? I am
using Windows XP