Thanks, Dave.
Sprinks
"Dave Peterson" wrote:
> I don't think so.
>
>
> Sprinks wrote:
> >
> > Looping through a FileSearch.FoundFiles object's collection, I have all the
> > filenames in a given directory. If the file has a password, I'd like to
> > change it to a new value. Can I do this without opening the file?
> >
> > ' pseudocode
> > Dim fs as FileSearch
> > If (the workbook corresponding to fs.FoundFiles(i)).HasPassword Then
> > Open
> > .Password = strNew
> > .Save
> > .Close
> > End If
> >
> > Can anyone help?
> > Sprinks
>
> --
>
> Dave Peterson
>
|